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05 

.TITLE "0SNFV60 

0000 


10 

*= $F000 

F000 

D003 

15 

. BNE NLR 

F002 

AE7F04 

20 

i LDX $047F 

F005 

SEBA02 

25 NLR ; STX $028A 

FOOS 

4CD6EF 

30 

, JMP $EFD6 

FOOB 

C63F 

35 ATEDF DEC $3F 

FOOD 

AOBB 

40 ISEOF LDY #$88 

FOOF 

60 

45 

RTS 

F010 

A63D 

50 PBYTE LDX $3D 

F012 

9D0004 

55 

STA $0400, X 

F015 

E63D 

60 

INC $3D 

F017 

A001 

65 

LDY #1 

F019 

E07F 

70 

CPX #127 

F01B 

FOOi 

75 

BEQ *+3 

F01D 

60 

80 

RTS 

FOIE 

A9FC 

85 

LDA #$FC 

F020 

20D2F0 

90 

JSR WSIOSB 

F023 

A900 

95 

LDA #0 

F025 

B53D 

0 1 00 

STA $3D 

F027 

60 

0105 

RTS 

F028 

A001 

0110 

STATU LDY #1 

F02A 

60 

01 15 

RTS 

F02B 

AD8902 

0120 

CLOSEC LDA $0289 

F02E 

3008 

0125 

BMI CLWRT 

F030 

A001 

0130 

LDY #1 

F032 

A93C 

0135 

FCAX LDA #$3C 

F034 

8D02D3 

0140 

STA $D302 

F037 

60 

0145 

RTS 

F03B 

A63D 

0150 

CLWRT LDX $3D 

F03A 

FOOA 

0155 

BEQ WTLR 

F03C 

8E7F04 

0160 

STX $047F 

F03F 

A9FA 

0165 

LDA #$FA 

F041 

20D2F0 

0170 

JSR WSIOSB 

F044 

30EC 

0175 

BMI FCAX 

F046 

A27F 

0 1 80 

WTLR LDX #127 

F04B 

A900 

0185 

LDA #0 

F04A 

9D0004 

0190 

ZTBUF STA $0400, X 

F04D 

CA 

0195 

DEX 

F04E 

10FA 

0200 

BPL ZTBUF 

F050 

A9FE 

0205 

LDA #$FE 

F052 

20D2F0 

0210 

JSR WSIOSB 

F055 

4C32F0 

0215 

JMP FCAX 

F058 

8540 

0220 

BEEP STA $40 

F05A 

A514 

0225 

BEEP1 LDA $14 

F05C 

18 

0230 

CLC 

F05D 

691E 

0235 

ADC #30 

F05F 

AA 

0240 

TAX 

F060 

A9FF 

0245 

WFL LDA #$FF 

F062 

8D1FD0 

0250 

STA $D0 1 F 

F065 

A900 

0255 

LDA #0 

F067 

AOFO 

0260 

LDY #$F0 

F069 

88 

0265 

DEY 

FOB A 

DOFD 

0270 

BNE *-l 

F06C 

8D1FD0 

0275 

STA $D01F 

F06F 

AOFO 

0280 

LDY #$F0 

F07 1 

88 

0285 

DEY 

F072 

DOFD 

0290 

BNE *-i 

F074 

E414 

0295 

CPX $14 

FG76 

DOES 

0300 

BNE WFL 

F078 

C640 

0305 

DEC $40 
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2 


F07A 

FOOB 

0310 

BEQ 

WFAK 

F07C 

8A 

0315 

TXA 


F07D 

18 

0320 

CLC 


F07E 

690A 

0325 

ADC 

#10 

F080 

AA 

0330 

TAX 


F081 

E414 

0335 

CPX 

$14 

F083 

DOFC 

0340 

BNE 

*-2 

F085 

F0D3 

0345 

BEQ 

BEEP1 

F087 

208CF0 

0350 

WFAK JSR WFAK1 

F08 A 

98 

y ■— * i f 

TYA 


F08B 

60 

0360 

RTS 


F08C 

AD25E4 

0365 

WFAKi LDA $E425 

F08F 

48 

0370 

PHA 


F090 

AD24E4 

0375 

LDA 

$E424 

F093 

48 

0380 

PHA 


F094 

60 

0385 

RTS 


F095 

8D0203 

0390 

SIQSB ST A $0302 

F098 

A900 

0395 

LDA 

#0 

F09A 

8D0903 

0400 

STA 

$0309 

F09D 

A983 

0405 

LDA 

#131 

F09F 

SD0803 

0410 

STA 

$0308 

F0A2 

A903 

0415 

LDA 

#3 

F0A4 

8D0503 

0420 

STA 

$0305 

F0A7 

A9FD 

0425 

LDA 

#$FD 

F0A9 

8D0403 

0430 

STA 

$0304 

FOAC 

A960 

0435 

CSIO LDA #$60 

FOAE 

8D0003 

0440 

STA 

$0300 

FOB1 

A90O 

0445 

LDA 

#0 

F0B3 

8D0 1 03 

0450 

STA 

$0301 

FOB 6 

A923 

0455 

LDA 

#35 

FOBS 

8D0603 

0460 

STA 

$0306 

FOBB 

AD02O3 

0465 

LDA 

$0302 

FOBE 

A040 

0470 

LDY 

#$40 

FOCO 

C952 

0475 

CMP 

#$52 

F0C2 

F002 

0480 

BEQ 

*+4 

F0C4 

AOBO 

0485 

LDY 

#$80 

F0C6 

8C0303 

0490 

STY 

$0303 

F0C9 

A53E 

0495 

LDA 

$3E 

FOCB 

8D0B03 

0500 

STA 

$030B 

FOCE 

2059E4 

0505 

JSR 

$E459 

FOD1 

60 

0510 

RTS 


FOD2 

8DFF03 

0515 

WSIOSB STA $03FF 

F0D5 

A955 

0520 

LDA 

#$55 

F0B7 

8DFD03 

0525 

STA 

$03FD 

FODA 

8DFE03 

0530 

STA 

$03FE 

FODD 

A957 

0535 

LDA 

#$57 

FODF 

2095F0 

0540 

JSR 

SIOSB 

F0E2 

60 

0545 

RTS 


F0E3 

50 

0550 

TBLENT . 

BYTE P ' 

F0E4 

30E4 

0555 

•BYTE $30, $E4 

F0E6 

43 

0560 

.BYTE *C 

F0E7 

40 E4 

0565 

.BYTE $40, $E4 

F0E9 

45 

0570 

. BYTE ? E 

FOEA 

00E4 

0575 

.BYTE $OG,$E4 

FOEC 

53 

0580 

. BYTE ' S 

FOED 

10E4 

0585 

.BYTE $1 0, $E4 

FOEF 

4B 

0590 

. BYTE ’ K 

FOF 0 

20E4 

0595 

.BYTE $20, $E4 

— 

OOOE 

0600 

TBLLEN = 

• 14 

FOF 2 

A23F 

0605 

CLICK LDX #$3F 

F0F4 

8E1FD0 

0610 

CLICK1 STX $D01F 
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F0F7 8E0AD4 
FOFA CA 
FOFB 10F7 
FOFD 60 
FOFE A900 
FI 00 A67B 
F102 D004 
FI 04 A657 
FI 06 D002 
FI OB A552 
F10A B555 
FiOC 60 
F10D 424F4F54 
Fill 20455252 
FI 15 4F529B 
=OOF 1 
=000D 

FI 18 453A9B 
=QOF 1 
=0018 
FI 1 B 78 
F11C AD4402 
FI IF D004 
F121 A9FF 
FI 23 D003 
FI 25 78 
FI 26 A900 
F128 8508 
F12A D8 
F12B A2FF 
F12D 9A 
F12E 203FF2 
F131 2077F2 
FI 34 A508 
FI 36 D028 
FI 38 A900 
F13A A008 
F13C 8504 
F13E 8505 
FI 40 9104 
F142 C8 
FI 43 COOO 
F 145 D0F9 
FI 47 E605 
F 149 A605 
F14B E406 
F14D D0F1 
F14F AD72E4 
FI 52 850A 
FI 54 AD73E4 
FI 57 850B 
F159 A9FF 
F15B 8D4402 
F15E DO 1 3 
FI 60 A200 
F162 8A 
FI 63 9D0002 
FI 66 9D0003 
FI 69 CA 
F16A D0F7 
F16C A210 


0615 STX $D40A 

0620 DEX 

0625 BPL CLICK1 

0630 RTS 

0635 COLCR LDA #0 
0640 LDX $7B 

0645 BNE COLCR 1 

0650 LDX $57 

0655 BNE C0LCR2 

0660 COLCR 1 LDA $52 
0665 C0LCR2 STA $55 
0670 RTS 

0675 DERRS .BYTE ,, BQQT ERROR", $9B 


0680 DERRH = DERR5/256 
0685 DERRL = DERR5&255 
0690 QPNEDT .BYTE ,, Es",$9B 


0695 

QPNH = 

OPNEDT/256 

0700 

QPNL = 

0PNEDT&255 

0705 

RESET SEI 

0710 

LDA 

$0244 

0715 

BNE 

PWRUP 

0720 

LDA 

#$FF 

0725 

BNE 

PWRUP 1 

0730 

PWRUP SEI 

0735 

LDA 

#0 

0740 

PWRUP 1 STA $08 

0745 

CLD 


0750 

LDX 

#$FF 

0755 

TXS 


0760 

JSR 

SPECL 

0765 

JSR 

HARD I 

0770 

LDA 

$08 

0775 

BNE 

ZOSRAM 

0780 

ZERORM LDA #0 

0785 

LDY 

#8 

0790 

STA 

$04 

0795 

STA 

$05 

0800 

CLRRAM STA ($04),Y 

0805 

INY 


0810 

CPY 

#o 

0815 

BNE 

CLRRAM 

0820 

INC 

$05 

0825 

LDX 

$05 

0830 

CPX 

$06 

0835 

BNE 

CLRRAM 

0840 

LDA 

$E472 

0845 

STA 

$0A 

0850 

LDA 

$E473 

0855 

STA 

$0B 

0860 

LDA 

#$FF 

0865 

STA 

$0244 

0870 

BNE 

ESTSCM 

0875 

ZOSRAM LDX #0 

0880 

TXA 


0885 

Z0SRM2 STA $0200, X 

0890 

STA 

$0300 , X 

0895 

DEX 


0900 

BNE 

Z0SRM2 

0905 

LDX 

#$10 
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F16E 

9500 

0910 

F 170 

E8 

0915 

F171 

10FB 

0920 

FI 73 

A902 

0925 

F175 

8552 

0930 

F177 

A927 

0935 

F179 

Swiijo 

0940 

F17B 

A225 

0945 

F17D 

BD80E4 

0950 

FI 80 

9D0002 

0955 

F 183 

CA 

0960 

F184 

10F7 

0965 

FI 86 

208AF2 

0970 

FI 89 

58 

0975 

F18A 

A20E 

0980 

F18C 

BDE3F0 

0985 

F18F 

9D1A03 

0990 

FI 92 

CA 

0995 

F193 

10F7 

1 000 

FI 95 

A200 

1005 

F197 

8607 

1010 

F199 

8606 

1015 

F19B 

AEE402 

1020 

F19E 

E090 

1025 

F1A0 

BOOA 

1030 

F1A2 

ADFC9F 

1035 

F1A5 

DO 05 

1040 

F1A7 

E607 

1045 

F1A9 

20D8EC 

1050 

FI AC 

AEE402 

1055 

F1AF 

EOBO 

1060 

F1B1 

BOOA 

1065 

F1B3 

AEFCBF 

1070 

F1B6 

D005 

1075 

F1B8 

E606 

1080 

FI BA 

20E2EC 

1 085 

F1BD 

A903 

1 090 

F1BF 

A200 

1095 

F1C1 

9D4203 

1100 

F1C4 

A918 

1 105 

F1C6 

9D4403 

1110 

F1C9 

A9F1 

1115 

F1CB 

9D4503 

1120 

F ICE 

A90C 

1 125 

FIDO 

9D4A03 

1 130 

F1D3 

2056E4 

1 135 

F1D6 

1003 

1140 

F IDS 

4C25F1 

1 145 

F1DB 

E8 

1 150 

FI DC 

DOFD 

1 155 

FIDE 

C8 

1 160 

F1DF 

10FA 

1165 

F1E1 

209EF3 

1170 

F1E4 

A506 

1175 

F1E6 

0507 

1180 

F1E8 

F012 

1185 

F1EA 

A506 

1190 

F1EC 

F003 

1195 

F1EE 

ADFDBF 

1200 

F1F1 

A607 

1205 

F1F3 

F003 

1210 


Z0SRM3 BTA 0,X 
INX 

BPL Z0BRM3 
ESTSCM LDA #2 
STA $52 
LDA #39 
STA $53 
DPSYS LDX #$25 
HOWEC LBA $E480, X 
STh $0200, X 
DEX 

BPL HOWEC 
JSR OSRAM 
CL I 

LDX #TBLLEN 
NXTENT LDA TBLENT, X 
STA $03 1 A , X 
DEX 

BPL NXTENT 
LDX #0 
STX $07 
STX $06 
LDX $02E4 
CF'X #$90 
BCS ENDBCK 
LDA $9FFC 
BNE ENDBCK 
INC $07 

JSR $ECD8 ; CHK 
ENDBCK LDX $02E4 
CPX #$B0 
BCS ENDACK 
LDX $BFFC 
BNE ENDACK 
INC $06 
JSR $ECE2 
ENDACK LDA #3 
LDX #0 
STA $0342, X 
LDA #OPNL 
STA $0344, X 
LDA #OPNH 
STA $0345, X 
LDA #$0C 
STA $034 A, X 
JSR $E45cj 
BPL SCRNOK 
JMP PWRUP 
SCRNOK INX 

BNE SCRNOK 
INY 

BPL SCRNOK 
JSR CSBOOT 
LDA $06 
ORA $07 
BEQ NOCART 
LDA $06 
BEQ N0A1 
LDA $BFFD 
N0A1 LDX $07 
BEQ N0B1 
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F1F5 

0DFD9F 

1215 

ORA $9FFD 

F1FS 

20BBEC 

1220 

NOB! JSR $ECBB 

F1FB 

EA 

1225 

NOP 

F1FC 

20CFF2 

1230 

NOCART JSR BOOT 

F1FF 

A900 

.1 jI— - * vJ 

NOBQQT LDA #0 

F201 

SD4402 

1240 

STh $0244 

F204 

A506 

1245 

LDA $06 

F206 

FOOA 

1250 

BEQ N0A2 

F208 

ADFBBF 

1255 

LDA $BFF0 

F20B 

2904 

1260 

AND #4 

F20D 

F003 

1265 

BEQ N0A2 

F20F 

6CFABF 

1270 

JMP ($BFFA> 

F212 

A507 

1275 

N0A2 LDA $07 

F214 

FOOA 

1280 

BEQ N0CAR2 

F216 

ADFD9F 

1285 

LDA $9FFD 

F219 

2904 

1290 

AND *4 

F21B 

FODF 

1295 

BEQ NOCART 

F21D 

6CFA9F 

1300 

JMP i$9FFA> 

F220 

6C0A00 

1305 

N0CAR2 JMP C$OA) 

F223 

203EF6 

1310 

BLACKB JSR ESETCH 

F226 

4C23F2 

1315 

JMP BLACKB 

F229 

A22D 

1320 

TSTCTL LDX #45 

F22B 

BDCEFE 

1 325 

TSTCT1 LDA CNTRLS, 

F22E 

CDFB02 

1 v'30 

CMP $02FB 

F231 

F005 

1335 

BEQ TSTCT2 

F233 

CA 

1340 

DEX 

F234 

CA 

1345 

DEX 

F235 

CA 

1 350 

DEX 

F236 

10F3 

1355 

BPL TSTCT1 

F23B 

60 

1360 

TSTCT2 RTS 

F239 

6CFEBF 

1365 

CAINI JMP ($BFFE) 

F23C 

6CFE9F 

1370 

CBINI JMP ($9FFE) 

F23F 

ADFCBF 

1375 

SPECL LDA $BFFC 

F242 

DO 13 

1380 

BNE ENSPE2 

F244 

EEFCBF 

1385 

INC $BFFC 

F247 

ADFCBF 

1 390 

LDA $BFFC 

F24A 

DOOB 

1395 

BNE ENSPEC 

F24C 

ADFDBF 

1400 

LDA $BFFD 

F24F 

1 003 

1405 

BPL ENSPEC 

F251 

20B0EC 

1410 

JSR $ECBG 

F254 

CEFCBF 

1415 

ENSPEC DEC $BFFC 

F257 

AOOO 

1420 

ENSPE2 LDY #0 

F259 

8405 

1425 

STY $05 

F25B 

A910 

1430 

LDA #$10 

F25D 

8506 

1435 

ST A $06 

F25F 

B105 

1440 

HOWMCH LDA ($05) ,Y 

F261 

49FF 

1445 

EOR #$FF 

F263 

9105 

1450 

ST A ($05) , Y 

F265 

D105 

1455 

CMP ($05) , Y 

F267 

DOOD 

1460 

BNE ENDRAM 

F269 

49FF 

1465 

EOR #$FF 

F26B 

9105 

1470 

ST A ($05) ..Y 

F26D 

A506 

1475 

LDA $06 

F26F 

18 

1480 

CLC 

F 27 0 

6910 

1485 

ADC #$10 

F272 

8506 

1490 

STA $06 

F274 

D0E9 

1495 

BNE HOWMCH 

F276 

60 

1500 

ENDRAM RTS 

F277 

A900 

1505 

HARDI LDA #0 

F279 

AA 

1510 

TAX 

F27A 

9DOODO 

1515 

CLRCHP STA $D0Q0, X 
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F27D 

9D00D4 

1520 

STA 

$D400, X 

F280 

9D00D2 

1525 

STA 

$D200, X 

F283 

9D00D3 

1530 

STA 

$D300, X 

F286 

E8 

1535 

INX 


F287 

DOF 1 

1540 

BNE 

CLRCHP 

F289 

60 

1545 

RTS 


F28A 

C611 

1550 

OSRAM DEC $11 

F2BC 

A954 

1555 

LDA 

#$54 

F28E 

8D3602 

1 560 

STA 

$0236 

F291 

A9E7 

1565 

LDA 

#$E7 

F293 

8D3702 

1570 

STA 

$0237 

F296 

A506 

1 575 

LDA 

$06 

F298 

8DE402 

1580 

STA 

$02E4 

F29B 

8DE602 

1585 

STA 

$02E6 

F29E 

A900 

1590 

LDA 

#Q 

F2A0 

8DE502 

1595 

STA 

$Q2E5 

F2A3 

8DE702 

1600 

STA 

$02E7 

F2A6 

EA 

1605 

NOP 


F2A7 

EA 

1610 

NOP 


F2A8 

A907 

1615 

LDA 

#7 

F2AA 

8DE802 

1620 

STA 

$02E8 

F2AD 

200CE4 

1625 

JSR 

$E40C 

F2B0 

201CE4 

1630 

JSR 

$E41C 

F2B3 

202CE4 

1635 

JSR 

$E42C 

F2B6 

203CE4 

1640 

JSR 

$E43C 

F2B9 

204CE4 

1 645 

JSR 

$E44C 

F2BC 

206EE4 

1650 

JSR 

$E46E 

F2BF 

2065E4 

1 655 

JSR 

$E465 

F2C2 

206BE4 

1660 

JSR 

$E46B 

F2C5 

AD IF DO 

1665 

LDA 

$D01F 

F2CB 

2901 

1670 

AND 

#1 

F2CA 

D002 

1675 

BNE 

NOKEY 

F2CC 

E64A 

1680 

INC 

$4A 

F2CE 

60 

1685 

NOKEY RTS 

F2CF 

A508 

1690 

BOOT LDA $08 

F2D1 

FOOA 

1695 

BEQ 

NOWARM 

F2D3 

A509 

1700 

LDA 

$09 

F2D5 

2901 

1705 

AND 

#1 

F2D7 

F003 

1710 

BEQ 

NOINIT 

F2D9 

207EF3 

1715 

JSR 

DINI 

F2DC 

60 

1720 

NOINIT RTS 

F2DD 

A901 

1725 

NO WARM LDA #1 

F2DF 

8D0103 

1730 

STA 

$030 1 

F2E2 

A953 

1735 

LDA 

#$53 

F2E4 

8D0203 

1740 

STA 

$0302 

F2E7 

2053E4 

1745 

JSR 

$E453 

F2EA 

1001 

1750 

BPL 

DOBOOT 

F2EC 

60 

1755 

RTS 


F2ED 

A900 

1760 

DOBOOT LDA #0 

F2EF 

8D0B03 

1765 

STA 

$030B 

F2F2 

8D0403 

1770 

STA 

$0304 

F2F5 

A901 

1775 

LDA 

#1 

F2F7 

8D0A03 

1780 

STA 

$030A 

F2FA 

A904 

1785 

LDA 

#4 

F2FC 

8D0503 

1790 

STA 

$0305 

F2FF 

EA 

1795 

NOP 


F300 

EA 

1 800 

NOP 


F301 

20C0FC 

1805 

SECT 1 JSR GETSEC 

F304 

1008 

1810 

BPL 

ALLSEC 

F306 

208 1 F3 

1815 

BADDSK JSR DSKRDE 

F309 

A54B 

1820 

LDA 

$4B 
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F30B 

FOEO 

1825 

F30D 

60 

1 830 

F30E 

A203 

1835 

F310 

BD0004 

1840 

F313 

9D4002 

1845 

F316 

CA 

1850 

F31 7 

10F7 

1855 

F31 9 

AD4202 

1 860 

F31C 

8504 

1865 

F31E 

AD 4302 

1870 

F321 

8505 

1 875 

F323 

AD0404 

1880 

F326 

850C 

1885 

F32S 

AD0504 

1890 

F32B 

850D 

1895 

F32D 

A07F 

1900 

F32F 

B90004 

1905 

F332 

9104 

1910 

F334 

88 

1915 

F335 

10F8 

1920 

F337 

18 

1925 

F338 

A504 

1930 

F33A 

6980 

1935 

F33C 

8504 

1940 

F33E 

A505 

1945 

F340 

6900 

1950 

F342 

8505 

1 955 

F344 

CE4102 

1960 

F347 

F011 

1965 

F349 

EE0A03 

1970 

F34C 

20C0FC 

1975 

F34F 

10DC 

1980 

F351 

2081 F3 

1985 

F354 

A54B 

1990 

F356 

DOAE 

1995 

F35S 

F0F2 

2000 

F35A 

A54B 

2005 

F35C 

F003 

2010 

F35E 

20C0FC 

2015 

F361 

206CF3 

2020 

F364 

BO AO 

2025 

F366 

207EF3 

2030 

F369 

E609 

2035 

F36B 

60 

2040 

F36C 

18 

2045 

F36D 

AD4202 

2050 

F370 

6906 

2055 

F372 

8504 

2060 

F374 

AD4302 

2065 

F377 

6900 

2070 

F379 

8505 

2075 

F37B 

6C0400 

2080 

F37E 

6C0C00 

2085 

F381 

A20D 

2090 

F383 

A0F1 

2095 

F385 

8A 

2100 

F386 

A200 

2105 

F388 

9D4403 

2110 

F38B 

98 

2115 

F38C 

9D4503 

2120 

F38F 

A909 

2125 


BEQ DOBOOT 
RTS 

ALLSEC LDX #3 
RDBYTE LDA $0400, X 
STA $0240, X 
DEX 

BPL RDBYTE 
LDA $0242 
STA $04 
LDA $0243 
STA $05 
LDA $0404 
STA $0C 
LDA $0405 
STA $0D 

MVBUFF LDY #$7F 
MVNXB LDA $0400, Y 
STA ($04) , Y 
DEY 

BPL MVNXB 
CLC 

LDA $04 
ADC #$80 
STA $04 
LDA $05 
ADC #0 
STA $05 
DEC $0241 
BEQ ENBOOT 
INC $030 A 
SECTX JSR GETSEC 
BPL MVBUFF 
JSR D5KRDE 
LDA $4B 
BNE BADDSK 
BEQ SECTX 
ENBOOT LDA $4B 
BEQ XBOOT 
JSR GETSEC 
XBOOT JSR BLOAD 
BCS BADDSK 
JSR DINI 
INC $09 
RTS 

BLOAD CLC 

LDA $0242 
ADC #6 
STA $04 
LDA $0243 
ADC #0 
STA $05 
JMP ($04) 

DINI JMP ($0C) 
DSKRDE LDX #DERRL 
LDY #DERRH 
PUTLIN TXA 
LDX #0 
STA $0344, X 
TYA 

STA $0345, X 
LDA #9 
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F391 

9D4203 

2130 

STA 

$0342, X 

F394 

A9FF 

2135 

LDA 

#$FF 

F396 

9D4803 

2140 

STA 

$0348, X 

F399 

4C56E4 

2145 

JMP 

$E456 

F39C 

EA 

2150 

NOP 


F39D 

EA 

2155 

NOP 


F39E 

A508 

2160 

CSBOOT 1 

LDA $08 

F3AO 

FOOA 

2165 

BEQ 

CSB0T2 

F3A2 

A509 

2170 

LDA 

$09 

F3A4 

2902 

2175 

AND 

#2 

F3A6 

F003 

2180 

BEQ 

N0CSB2 

F3A8 

20CDF3 

2185 

JSR 

CINI 

F3AB 

60 

2190 

N0CSB2 RTS 

F3AC 

A54A 

2195 

CSB0T2 LDA $4A 

F3AE 

F01C 

2200 

BEQ 

NOCSBT 

F3B0 

A980 

2205 

LDA 

#$80 

F3B2 

853E 

2210 

STA 

$3E 

F3B4 

E64B 

2215 

INC 

$4B 

F3B6 

207DE4 

2220 

JSR 

$E47D 

F3B9 

200 1 F3 

2225 

JSR 

SECT 1 

F3BC 

A900 

2230 

LDA 

#0 

F3BE 

854B 

2235 

STA 

$4B 

F3C0 

854A 

2240 

STA 

$4A 

F3C2 

0609 

2245 

ASL 

$09 

F3C4 

A50C 

2250 

LDA 

$0C 

F3C6 

8502 

2255 

STA 

$02 

F3C8 

A50D 

2260 

LDA 

$0D 

F3CA 

8503 

2265 

STA 

$03 

F3CC 

60 

2270 

NOCSBT RTS 

F3CD 

6C0200 

2275 

CINI JMP ($02) 

F3D0 

A9FF 

2280 

PWRONA LDA #$FF 

F3D2 

8DFC02 

2285 

STA 

$02FC 

F3D5 

ADE602 

2290 

LDA 

$02E6 

F3D8 

29 FO 

2295 

AND 

#$F0 

F3DA 

856A 

2300 

STA 

$6A 

F3DC 

A940 

2305 

LDA 

#$40 

F3DE 

8DBE02 

2310 

STA 

$02BE 

F3E1 

60 

2315 

RTS 


F3E2 

A205 

2320 

DOPENO LDX #5 

F3E4 

BDCBFE 

j rrncr 

ji.oz.iJ 

D0PEN8 LDA COLR 

F3E7 

9DC302 

2330 

STA 

$02C3, X 

F3EA 

CA 

2335 

DEX 


F3EB 

D0F7 

2340 

BNE 

DOPENS 

F3ED 

8664 

2345 

STX 

$64 

F3EF 

A46A 

2350 

LDY 

$6A 

F3F 1 

88 

2355 

DEY 


F3F2 

8C9502 

2360 

STY 

$0295 

F3F5 

60 

2365 

RTS 


F3F6 

A52B 

2370 

DOPEN LDA $2B 

F3F8 

290F 

2375 

AND 

#$0F 

F3FA 

D008 

2380 

BNE 

OPNCOM 

F3FC 

A52A 

2385 

EOPEN LDA $2A 

F3FE 

290F 

2390 

AND 

#$0F 

F400 

852A 

2395 

STA 

$2A 

F402 

A900 

2400 

LDA 

#0 

F4Q4 

8557 

2405 

OPNCOM STA $57 

F406 

20E2F3 

2410 

JSR 

DOPENO 

F409 

8E9302 

2415 

STX 

$0293 

F40C 

867B 

2420 

STX 

$7B 

F40E 

8EF002 

2425 

STX 

$02F0 

F41 1 

A9E0 

2430 

LDA 

#$E0 


OLD DOPEN 
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F41 3 

8DF402 

2435 

STA 

$02F4 

F416 

A902 

2440 

LDA 

#2 

F418 

8DF302 

2445 

STA 

$02F3 

F41B 

8D2F02 

2450 

STA 

$022F 

F41E 

A901 

2455 

LDA 

#1 

F420 

854C 

2460 

STA 

$4C 

F422 

AOOE 

2465 

LDY 

#14 

F424 

99A302 

2470 

CLRTBS STA $02A3 

F427 

88 

2475 

DEY 


F428 

10FA 

2480 

BPL 

CLRTBS 

F42A 

A9C0 

2485 

LDA 

#$C0 

F42C 

0510 

2490 

ORA 

$10 

F42E 

8510 

2495 

STA 

$10 

F430 

BD0ED2 

2500 

STA 

$D20E 

F433 

A960 

2505 

LDA 

#$60 

F435 

8D9402 

2510 

STA 

$0294 

F438 

A657 

ncr -j c 
jLvJ -X - — f 

LDX 

$57 

F43A 

BD55FE 

2520 

LDA 

ANCONV, X 

F43D 

B004 

2525 

BNE 

DOPENA 

F43F 

A991 

2530 

OPNERR LDA #$91 

F441 

854C 

2535 

STA 

$4C 

F443 

8551 

2540 

DOPENA STA $51 

F445 

A56A 

2545 

LDA 

$6A 

F447 

8565 

2550 

STA 

$65 

F449 

BC25FE 

2555 

LDY 

ALOCAT, X 

F44C 

A928 

2560 

DDPEN1 LDA #40 

F44E 

202 1F9 

2565 

JSR 

DBSUB 

F451 

88 

2570 

DEY 


F452 

DOFS 

2575 

BNE 

D0PEN1 

F454 

AD6F02 

2580 

LDA 

$026F 

F457 

293F 

2585 

AND 

#$3F 

F459 

8567 

2590 

STA 

$67 

F45B 

A8 

2595 

TAY 


F45C 

E008 

2600 

CPX 

#8 

F45E 

90 IF 

2605 

BCC 

N0T8 

F460 

EOOF 

2610 

CPX 

#15 

F462 

FOOD 

2615 

BEQ 

MODE 15 

F464 

EOOC 

2620 

CPX 

#12 

F466 

BO 17 

2625 

BCS 

N0T8 

F46B 

8A 

2630 

TXA 


F469 

6A 

2635 

ROR 

A 

F46A 

6A 

2640 

ROR 

A 

F46B 

6A 

2645 

ROR 

A 

F46C 

29C0 

2650 

AND 

#$C0 

F46E 

0567 

2655 

ORA 

$67 

F470 

A8 

2660 

TAY 


F47 1 

A910 

jZ /j i ! 

MODE 15 LDA #16 

F473 

202 1F9 

2670 

JSR 

DBSUB 

F476 

EOOB 

2675 

CPX 

#11 

F478 

D005 

2680 

BNE 

N0T8 

F47A 

A906 

2685 

LDA 

#6 

F47C 

8DCB02 

2690 

STA 

$02CB 

F47F 

8C6F02 

2695 

N0T8 STY $026F 

F482 

A564 

2700 

LDA 

$64 

F484 

8558 

2705 

STA 

$58 

F486 

A565 

2710 

LDA 

$65 

F488 

8559 

2715 

STA 

$59 

F48A 

AD0BD4 

2720 

VBWAIT LDA $D40B 

F48D 

C97A 

2725 

CMP 

#$7A 

F48F 

D0F9 

2730 

BNE 

VBWAIT 

F491 

201FF9 

2735 

JSR 

DBDEC 
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F494 

BD65FE 

2740 

LDA 

PAGETB, X 

F497 

F006 

2745 

BEQ 

NOMOD 

F499 

A9FF 

2750 

LDA 

#$FF 

F49B 

8564 

2755 

STA 

$64 

F49D 

C665 

2760 

DEC 

$65 

F49F 

A564 

2765 

NOMOD LDA $64 

F4A1 

8568 

2770 

STA 

$68 

F4A3 

A565 

2775 

LDA 

$65 

F4A5 

8569 

2780 

STA 

$69 

F4A7 

20 1 3F9 

2785 

JSR 

DBDDEC 

F4AA 

A941 

2790 

LDA 

#$41 

F4AC 

2017F9 

2795 

JSR 

STORE 

F4AF 

8666 

2800 

STX 

$66 

F4B1 

A918 

2805 

LDA 

#24 

F4B3 

8DBF02 

2810 

STA 

$02BF 

F4B6 

A557 

2815 

LDA 

$57 

F4B8 

C90C 

2820 

CMP 

#12 

F4BA 

B004 

2825 

BCS 

MODE 12 

F4BC 

C909 

2830 

CMP 

#9 

F4BE 

B02D 

2835 

BCS 

NOTMXD 

F4C0 

A52A 

2840 

MODE 12 LDA $2A 

F4C2 

2910 

2845 

AND 

#$10 

F4C4 

F027 

2850 

BEQ 

NOTMXD 

F4C6 

A904 

2855 

LDA 

#4 

F4CB 

8DBF02 

2860 

STA 

$02BF 

F4CB 

A202 

2865 

LDX 

#2 

F4CD 

A902 

2870 

D0PEN2 LDA #2 

F4CF 

2017F9 

2875 

JSR 

STORE 

F4D2 

CA 

2880 

DEX 


F4D3 

10F8 

2885 

BF'L 

D0PEN2 

F4D5 

A46A 

2890 

LDY 

$6A 

F4D7 

88 

2895 

DEY 


F4DB 

98 

2900 

TYA 


F4D9 

2017F9 

2905 

JSR 

STORE 

F4DC 

A960 

2910 

LDA 

#$60 

F4DE 

2017F9 

2915 

JSR 

STORE 

F4E1 

A942 

2920 

LDA 

#$42 

F4E3 

2017F9 

2925 

JSR 

STORE 

F4E6 

18 

2930 

CLC 


F4E7 

A910 

2935 

LDA 

#MXDMDE— NUMDLE 

F4E9 

6566 

2940 

ADC 

$66 

F4EB 

8566 

2945 

STA 

$66 

F4ED 

A466 

2950 

NOTMXD LDY $66 

F4EF 

BE35FE 

2955 

LDX 

NUMDLE, Y 

F4F2 

A551 

2960 

D0PEN3 LDA $51 

F4F4 

2017F9 

2965 

JSR 

STORE 

F4F7 

CA 

2970 

DEX 


F4FB 

DOFS 

2975 

BNE 

D0PEN3 

F4FA 

A557 

2980 

LDA 

$57 

F4FC 

C908 

2985 

CMP 

#8 

F4FE 

9026 

2990 

BCC 

D0PEN5 

F500 

C90F 

2995 

CMP 

#15 

F502 

F004 

3000 

BEQ 

MDE15 

F504 

C90C 

3005 

CMP 

#12 

F506 

BO IE 

3010 

BCS 

D0PEN5 

F508 

A25D 

3015 

MDE15 LDX #93 

F50A 

A56A 

3020 

LDA 

$6A 

F50C 

38 

3025 

SEC 


F50D 

E910 

3030 

SBC 

#$10 

F50F 

2017F9 

3035 

JSR 

STORE 

F512 

A900 

3040 

LDA 

#0 
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F514 

2017F9 

3045 

JSR 

STORE 

F517 

A551 

3050 

LDA 

$51 

F519 

0940 

3055 

ORA 

#$40 

F51B 

2017F9 

3060 

JSR 

STORE 

F51E 

A551 

3065 

D0PEN4 1 

LDA $51 

F520 

2017F9 

3070 

JSR 

STORE 

F523 

CA 

3075 

DEX 


F524 

DoFB 

3080 

BNE 

D0PEN4 

F526 

A559 

3085 

D0PEN5 LDA $59 

F52B 

2017F9 

3090 

JSR 

STORE 

F52B 

A558 

3095 

LDA 

$58 

F52D 

201 7F9 

3100 

JSR 

STORE 

F530 

A551 

3105 

LDA 

$51 

F532 

0940 

3110 

ORA 

#$40 

F534 

A203 

3115 

LDX 

#3 

F536 

2017F9 

3120 

D0PEW6 JSR STOR 

F539 

A970 

3125 

LDA 

#$70 

F53B 

CA 

3 1 30 

DEX 


F53C 

DOFB 

3135 

BNE 

D0PEN6 

F53E 

A564 

3140 

LDA 

$64 

F540 

8D3002 

3145 

STA 

$0230 

F543 

A565 

3150 

LDA 

$65 

F545 

8D3102 

3155 

STA 

$0231 

F54B 

A970 

3160 

LDA 

#$70 

F54A 

201 7 F9 

3165 

JSR 

STORE 

F54D 

A564 

3170 

LDA 

$64 

F54F 

8DE502 

3175 

STA 

$02E5 

F %—Ijc. 

A565 

3180 

LDA 

$65 

F554 

8DE602 

3185 

STA 

$02E6 

F557 

A568 

3190 

LDA 

$68 

F559 

8564 

3195 

STA 

$64 

F55B 

A569 

3200 

LDA 

$69 

F55D 

8565 

3205 

STA 

$65 

F55F 

AD3102 

3210 

LDA 

$0231 

F562 

201 7F9 

3215 

JSR 

STORE 

F565 

AD3002 

3220 

LDA 

$0230 

F568 

2017F9 

3225 

JSR 

STORE 

F56B 

A54C 

3230 

LDA 

$4C 

F56D 

1007 

3235 

BPL 

D0PEN9 

F56F 

48 

3240 

PHA 


F570 

20FCF3 

3245 

JSR 

EOPEN 

F573 

68 

3250 

PLA 


F574 

A8 

3255 

TAY 


F575 

60 

3260 

RTS 


F576 

A52A 

3265 

D0PEN9 LDA $2A 

F57S 

2920 

3270 

AND 

#$20 

F57A 

DOOB 

3275 

BNE 

D0PEN7 

F57C 

20B9F7 

3280 

JSR 

CLRSCR 

F57F 

8D9002 

3285 

STA 

$0290 

F5B2 

A552 

3290 

LDA 

$52 

F5B4 

8D9102 

3295 

STA 

$0291 

F5B7 

A922 

3300 

D0PEN7 LDA #$22 

F589 

0D2F02 

3305 

ORA 

$022F 

F58C 

8D2F02 

3310 

STA 

$022F 

F58F 

4C21F6 

3315 

JMP 

RETUR2 

F592 

EA 

3320 

NOP 


F593 

20 96 FA 

3325 

GETCH JSR RANGE 

F596 

20A2F5 

3330 

JSR 

GETPLT 

F599 

2032FB 

3 3 i_j 

JSR 

I NAT AC 

F59C 

20D4F9 

3340 

JSR 

INCRSB 

F59F 

4C34F6 

3345 

JMP 

RETUR1 


FILLER 
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F5A2 

2047F9 

3350 

GETPLT 

JSR CONVRT 

F5A5 

B164 

335wj 

LDA 

(*64> , Y 

F5A7 

2DA002 

3360 

AND 

*02A0 

F5AA 

466F 

3365 

SHIFTD 1 

LSR $6F 

F5AC 

B003 

3370 

BCS 

SHIFT1 

F5AE 

4A 

3375 

LSR 

A 

F5AF 

10F9 

3380 

BPL 

SHIFTD 

F5B1 

8DFA02 

3385 

SHIFT 1 i 

STA *02FA 

F5B4 

C900 

3390 

CMP 

#0 

F5B6 

60 

3395 

RTS 


F5B7 

8DFB02 

3400 

OUTCH STA *02FB 

F5BA 

2096FA 

3405 

JSR 

RANGE 

F5BD 

ADFB02 

3410 

OUTCHA 1 

LDA $02FB 

F5C0 

C97D 

3415 

CMP 

#*7D 

F5C2 

DO 06 

3420 

BNE 

OUTCHE 

F5C4 

20B9F7 

3425 

JSR 

CLRSCR 

F5C7 

4C21F6 

3430 

JMP 

RETUR2 

F5CA 

ADFB02 

3435 

OUTCHE 1 

LDA *02FB 

F5CD 

C99B 

3440 

CMP 

#*9B 

F5CF 

DO 06 

3445 

BNE 

OUTCHB 

F5D1 

2030FA 

3450 

JSR 

DQCRWS 

F5D4 

4C21F6 

3455 

JMP 

RETUR2 

F5D7 

20E0F5 

3460 

OUTCHB , 

JSR OUTPLT 

F5DA 

20D8F9 

3465 

JSR 

INCRSR 

F5DD 

4C21F6 

3470 

JMP 

RETUR2 

F5E0 

ADFF02 

3475 

OUTPLT 1 

LDA $02FF 

F5E3 

DOFB 

3480 

BNE 

OUTPLT 

F5E5 

A202 

3485 

LDX 

#2 

F5E7 

B554 

3490 

CRLOOP 1 

LDA *54, X 

F5E9 

955A 

3495 

STA 

*5 A, X 

*» 

F5EB 

CA 

3500 

DEX 


F5EC 

10F9 

3 v^Owi 

BPL 

CRLOOP 

F5EE 

ADFB02 

3510 

LDA 

*02FB 

F5F1 

A8 

3515 

TAY 


F5F2 

2A 

3520 

ROL 

A 

F5F3 

2A 

3525 

ROL 

A 

F5F4 

2A 

3530 

ROL 

A 

F5F5 

2A 

3535 

ROL 

A 

F5F6 

2903 

3540 

AND 

#3 

F5F8 

AA 

3545 

TAX 


F5F9 

98 

3550 

TYA 


F5FA 

299F 

3555 

AND 

#*9F 

F5FC 

1 DFOFF 

3560 

ORA 

ATAINT, X 

F5FF 

8DFA02 

3565 

0UTCH2 STA *02FA 

F602 

2047F9 

3570 

JSR 

CONVRT 

F605 

ADFA02 

3575 

LDA 

*02FA 

F608 

466F 

3580 

SHIFTU LSR $6F 

F60A 

BO 04 

3585 

BCS 

SHIFT2 

F60C 

OA 

3590 

ASL 

A 

F60D 

4COSF6 

3595 

JMP 

SHIFTU 

F610 

2DA002 

3600 

SHIFT2 AND *02 AO 

F613 

8550 

3605 

STA 

*50 

F615 

ADA002 

3610 

LDA 

*02A0 

F618 

49FF 

361 5 

EOR 

#*FF 

F61A 

3164 

3620 

AND 

(*64) , Y 

F61C 

0550 

3625 

ORA 

*50 

F61E 

9164 

3630 

STA 

(*64) , Y 

F620 

60 

3635 

RTS 


F621 

2UA2F5 

3640 

RETUR2 JSR GETPLT 

F624 

S55D 

3645 

STA 

*5D 

F626 

A657 

3650 

LDX 

*57 
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F628 

DOOA 

3655 

BNE 

RETUR1 

F62A 

AEF002 

3660 

LDX 

$02F0 

F62D 

D005 

3665 

BNE 

RETUR1 

F62F 

4980 

3670 

EOR 

#$80 

F631 

20FFF5 

3675 

JSR 

0UTCH2 

F634 

A44C 

3680 

RETUR1 LDY $4C 

F636 

A901 

3685 

LDA 

#1 

F63S 

854C 

3690 

STA 

$4C 

F63A 

ADFB02 

3695 

LDA 

$02FB 

F63D 

60 

3700 

NQFUNC RTS 

F63E 

209BFC 

3705 

EGETCH JSR SWAP 

F641 

2088FA 

3710 

JSR 

ERANGE 

F644 

A56B 

3715 

LDA 

$6B 

F646 

DO 34 

3720 

BNE 

EGETC3 

F64S 

A554 

3725 

LDA 

$54 

F64A 

856C 

3730 

STA 

$6C 

F64C 

A555 

3735 

LDA 

$55 

F64E 

856D 

3740 

STA 

$6D 

F650 

20E2F6 

3745 

EGETC1 JSR K6ETCH 

F653 

844C 

3750 

STY 

$4C 

F655 

ADFB02 

3755 

LDA 

$02FB 

F658 

C99B 

3760 

CMP 

#$9B 

F65A 

F012 

3765 

BEQ 

EGETC2 

F65C 

20ADF6 

3770 

JSR 

DOSS 

F65F 

209BFC 

3775 

JSR 

SWAP 

F662 

A563 

3780 

LDA 

$63 

F664 

C971 

3785 

CMP 

#1 13 

F666 

D003 

3790 

BNE 

EGETC6 

F668 

200AF9 

3795 

JSR 

BELL 

F66B 

4C5UF6 

3800 

EGETC6 JMP EGETC1 

F66E 

20E4FA 

3805 

EGETC2 JSR OFFCRS 

F671 

20F8FB 

3810 

JSR 

DOBUFC 

F674 

A56C 

3815 

LDA 

$6C 

F676 

8554 

3820 

STA 

$54 

F678 

A56D 

3825 

LDA 

$6D 

F67A 

8555 

3830 

STA 

$55 

F67C 

A56B 

383»j 

EGETC3 LDA $6B 

F67E 

F011 

3840 

BEQ 

EGETC5 

F680 

C66B 

3845 

EGETC7 DEC $6B 

Ft. 8 2 

FOOD 

3850 

BEQ 

EGETC5 

F684 

A54C 

3855 

LDA 

$4C 

F686 

30F8 

3860 

BMI 

EGETC7 

F6B8 

2093F5 

3865 

JSR 

GETCH 

F68B 

8DFB02 

3870 

STA 

$02FB 

F68E 

4C9BFC 

3875 

JMP 

SWAP 

F691 

2030FA 

3880 

EGETC5 JSR DOCRWS 

F694 

A99B 

3885 

LDA 

#$9B 

F696 

8DFB02 

3890 

STA 

$02FB 

F699 

2021 F6 

3895 

JSR 

RETUR2 

F69C 

844C 

3900 

STY 

$4C 

F69E 

4C9BFC 

3905 

JMP 

SWAP 

F6A1 

6C6400 

3910 

JSR1ND JMP ($64) 

Ft>A4 

8DFB02 

3915 

EOUTCH STA $02FB 

F6A7 

209BFC 

3920 

JSR 

SWAP 

F6AA 

2088FA 

3925 

JSR 

ERANGE 

F6AD 

20E4FA 

3930 

DOSS JSR OFFCRS 

F6B0 

2029F2 

3935 

JSR 

TSTCTL 

F6B3 

F009 

3940 

BEQ 

E0UTC5 

F6B5 

OEA202 

3945 

E0UTC6 ASL $02A2 

F6B8 

20CAF5 

3950 

JSR 

OUTCHE 

F6BB 

4C9BFC 

3955 

ERETN JMP SWAP 
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F6BE 

ADFE02 

3960 

F6C1 

0DA202 

3965 

F6C4 

DOEF 

3970 

F6C6 

0EA202 

3975 

F6C9 

E8 

3980 

F6CA 

BDCEFE 

3985 

F6CD 

8564 

3990 

F6CF 

BDCFFE 

3995 

F6D2 

8565 

4000 

F6D4 

20A1F6 

4005 

F6D7 

202 1F6 

4010 

F6DA 

4C9BFC 

4015 

F6DD 

A9FF 

4020 

F6DF 

8DFC02 

4025 

F6E2 

A52A 

4030 

F6E4 

4A 

4035 

F6E5 

B062 

4040 

F6E7 

A980 

4045 

F6E9 

A61 1 

4050 

F6EB 

FOSS 

4055 

F6ED 

ADFC02 

4060 

F6F0 

C9FF 

4065 

F6F2 

FOEE 

4070 

F6F4 

857C 

4075 

F6F6 

A2FF 

4080 

F6F8 

8EFC02 

4085 

F6FB 

20F2F0 

4090 

F6FE 

AA 

4095 

F6FF 

EOCO 

4100 

F701 

9002 

4105 

F703 

A203 

4110 

F705 

BDFEFE 

4115 

F708 

8DFB02 

4120 

F70B 

C980 

4125 

F70D 

FOCE 

4130 

F70F 

C981 

4135 

F71 1 

DOOB 

4140 

F71 3 

ADB602 

4145 

F71 6 

4980 

4 1 50 

F718 

8DB602 

4155 

F71B 

4CDDF6 

4160 

F71E 

C982 

4165 

F720 

D007 

4 1 70 

F722 

A900 

4175 

F724 

8DBE02 

4 1 80 

F727 

F0B4 

4185 

F729 

C983 

4 1 90 

F72B 

D007 

4195 

F72D 

A940 

4200 

F72F 

8DBE02 

4205 

F732 

D0A9 

4210 

F734 

C984 

4215 

F736 

DO 07 

4220 

F738 

A980 

4225 

F73A 

8DBE02 

4230 

F73D 

D09E 

4235 

F73F 

C985 

4240 

F741 

DOOA 

4245 

F743 

A988 

4250 

F745 

854C 

4255 

F747 

8511 

4260 


E0UTC5 LDA $02FE 
ORA *02A2 
BNE E0UTC6 
ASL *02A2 
INX 

LDA CNTRLS, X 
STA *64 

LDA CNTRLS+1 , X 
STA *65 
JSR JSRIND 
JSR RETUR2 
JMP SWAP 

KGETC2 LDA #*FF 
STA *02FC 

KGETCH LDA *2A 
LSR A 

DCS GETOUT 
LDA #*80 
LDX $11 
BEQ K7 
LDA *02FC 
CMP #*FF 
BEQ KGETCH 
STA *7C 
LDX #*FF 
STX *02FC 
JSR CLICK. 

KGETC3 TAX 

CPX #*C0 
BCC ASCC01 
LDX #3 

ASCC01 LDA ATASCI , X 
STA *02FB 
CMP #*80 
BEQ KGETC2 
CMP #*81 
BNE KGETC1 
LDA *02B6 
EOR #*80 
STA *02B6 
JMP KGETC2 

KGETC1 CMP #*82 



BNE 

K1 


LDA 

#0 


STA 

*02BE 


BEQ 

KGETC2 

K1 

CMP 

#*83 


BNE 

K2 


LDA 

#*40 


STA 

*02BE 


BNE 

KGETC2 

K2 

CMP 

#$84 


BNE 

K3 


LDA 

#$80 


STA 

*02BE 


BNE 

KGETC2 

K3 

CMP 

#*85 


BNE 

K6 


LDA 

#*88 

K7 

STA 

*4C 


STA 

*1 1 



PAGE 15 


QSNFV6G1 


F749 

A99B 

4265 

F74B 

D026 

4270 

F74D 

A57C 

4275 

F74F 

C940 

4280 

F751 

BO 15 

4285 

F753 

ADFB02 

4290 

F756 

C961 

4295 

F758 

900E 

4300 

F75A 

C97B 

4305 

F75C 

BOOA 

4310 

F75E 

ADBE02 

4315 

F761 

F005 

4320 

F763 

057C 

4325 

F765 

4CFEF6 

4330 

F768 

2029F2 

4335 

F76B 

F009 

4340 

F76D 

ADFB02 

4345 

F770 

4DB602 

4350 

F773 

8DFB02 

4355 

F776 

4C34F6 

4360 

F779 

A980 

4365 

F77B 

8DA202 

4370 

F77E 

60 

4375 

F77F 

C654 

4380 

F781 

1006 

4385 

F783 

AEBF02 

4390 

F786 

CA 

4395 

F787 

8654 

4400 

F789 

4C54FC 

4405 

F78C 

E654 

4410 

F78E 

A554 

4415 

F790 

CDBF02 

4420 

F793 

90F4 

4425 

F795 

A200 

4430 

F797 

FOEE 

4435 

F799 

L6o ■ i 

4440 

F79B 

A555 

4445 

F79D 

3004 

4450 

F79F 

C552 

4455 

F7A1 

BO 04 

4460 

F7A3 

A553 

4465 

F7A5 

8555 

4470 

F7A7 

4CD5FB 

4475 

F7AA 

E655 

4480 

F7AC 

A555 

4485 

F7AE 

C553 

4490 

F7B0 

90F5 

4495 

F7B2 

F0F3 

4500 

F7B4 

A552 

4505 

F7B6 

4CA5F7 

4510 

F7B9 

20D4FC 

4515 

F7BC 

AOOO 

4520 

F7BE 

98 

4525 

F7BF 

9164 

4530 

F7C1 

C8 

4535 

F7C2 

DOFB 

4540 

F7C4 

E665 

4545 

F7C6 

A665 

4550 

F7C8 

E46A 

4555 

F7CA 

90F3 

4560 

F7CC 

A9FF 

4565 


GETOUT LDA #$9B 



BNE 

K8 

K6 

LDA 

$7C 


CMP 

#$40 


BCS 

K5 


LDA 

$02FB 


CMP 

#$61 


BCC 

K5 


CMP 

#$7B 


BCS 

K5 


LDA 

$02BE 


BEQ 

K5 


DR A 

$7C 


JMP 

KGETC3 

K5 

JSR 

TSTCTL 


BEQ 

K4 


LDA 

$02FB 


EOR 

$02B6 

KB 

STA 

$02FB 

K4 

JMP 

RETUR1 


ESCAPE LDA #$80 
STA $02A2 
RTS 

CRSRUP DEC $54 
BPL COMRET 
LDX $02BF 
DEX 

UPDIMCM STX $54 
COMRET JMP STRBEG 
CRSRDN INC $54 
LDA $54 
CMP $02BF 
BCC COMRET 
LDX #0 
BEQ UPDNCM 
CRSRLF DEC $55 
LDA $55 
BMI CRSRL1 
CMP $52 
BCS C0MRE1 
CRSRL1 LDA $ i — i 
LFRTCM STA $55 
C0MRE1 JMP DOLCOL 
CRSRRT INC $55 
LDA $55 
CMP $53 
BCC C0MRE1 
BEQ C0MRE1 
LDA $52 
JMP LFRTCM 
CLRSCR JSR PUTMSC 
LDY #0 
TYA 

CLRSC2 STA ($64),Y 
INY 

BNE CLRSC2 
INC $65 
LDX $65 
CPX $6A 
BCC CLRSC2 
LDA #$FF 
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F7CE 

99B202 

4570 

F7D1 

C8 

4575 

F7D2 

C004 

4580 

F7D4 

90FB 

4585 

F7D6 

2OFEF0 

4590 

F7D9 

B563 

4595 

F7DB 

B56D 

4600 

F7DD 

A900 

4605 

F7DF 

B554 

4610 

F7E1 

8556 

4615 

F7E3 

B56C 

4620 

F7E5 

60 

4625 

F7E6 

A563 

4630 

F7E8 

C552 

4635 

F7EA 

F021 

4640 

F7EC 

A555 

4645 

F7EE 

C552 

4650 

F7F0 

D003 

4655 

F7F2 

206BFC 

4660 

F7F5 

2099F7 

4665 

F7F8 

f ! • ? i t * — f 

4670 

F7FA 

C553 

4675 

F7FC 

D007 

4680 

F7FE 

A554 

4685 

F800 

F003 

4690 

FB02 

207FF7 

4695 

F805 

A920 

4700 

F807 

8DFB02 

4705 

F80A 

20E0F5 

4710 

FBOD 

4CD5FB 

4715 

F810 

2UAAF7 

4720 

F813 

A555 

4725 

F815 

C552 

4730 

F817 

DOOA 

4735 

FBI 9 

2034FA 

4740 

FB1C 

2020FB 

4745 

FBI F 

9002 

4750 

FB21 

B007 

4755 

F823 

A563 

4760 

F825 

2025FB 

4765 

FB28 

90E6 

4770 

FB2A 

4CD5FB 

4775 

F82D 

A563 

4780 

F82F 

4C06FB 

4785 

FB32 

A563 

4790 

FB34 

4C12FB 

4795 

F837 

20B5FC 

4800 

F83A 

20A2F5 

4805 

FB3D 

857D 

4810 

FB3F 

A900 

4815 

FB41 

8DBB02 

4820 

FB44 

20FFF5 

4825 

FB47 

A563 

4830 

FB49 

48 

4835 

F84A 

20DCF9 

4840 

FB4D 

68 

4845 

FB4E 

C563 

4850 

F 850 

BOOC 

4855 

FB52 

A57D 

4860 

F854 

48 

4865 

FB55 

20A2F5 

4870 


CLRSC3 STA $02B2, 
INY 

CPY #4 
BCC CLRSC3 
HOME JSR COLOR 



STA 

$63 


STA 

$6D 


LDA 

#0 


STA 

$54 


STA 

$56 


STA 

RTS 

$6C 

BS 

LDA 

$63 


CMP 

$52 


BEQ 

BS1 

BSA 

LDA 

$55 


CMP 

$52 


BNE 

BS3 


JSR 

DELTIM 

BS3 

JSR 

CRSRLF 


LDA 

$55 


CMP 

$53 


BNE 

BS2 


LDA 

$54 


BEQ 

BS2 


JSR 

CRSRUP 

BS2 

LDA 

#$20 


STA 

$02FB 


JSR 

OUTPLT 

BS1 

JMP 

DOLCOL 

TAB 

JSR 

CRSRRT 


LDA 

$55 


CMP 

$52 


BNE 

TAB1 


JSR 

DOCR 


JSR 

LOGGET 


BCC 

TAB1 


BCS 

TAB2 

TAB1 

LDA 3»<b3 


JSR 

BITGET 


BCC 

TAB 


TAB2 JMP DOLCOL 
SETTAB LDA $63 
JMP BITSET 
CLRTAB LDA $63 
JMP BITCLR 
INSCHR JSR PHACRS 
JSR GETPLT 
STA $7D 
LDA #0 
STA $02BB 
INSCH4 JSR 0UTCH2 
LDA $63 
PHA 

JSR INCRSA 
PL A 

CMP $63 
BCS INSCH3 
INSCH1 LDA $7D 
PHA 

JSR GETPLT 
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F858 

857D 

4875 

STA 

$7D 

F85A 

68 

4880 

PLA 


F85B 

4C44F8 

4885 

JMP 

INSCH4 

F85E 

2090FC 

4890 

INSCH3 

JSR PLACRS 

F861 

CEBB02 

4895 

INSCH6 

DEC $02BB 

F864 

3004 

4900 

BMI 

INSCH5 

FB66 

C654 

4905 

DEC 

$54 

F86B 

D0F7 

4910 

BNE 

INSCH6 

FB6A 

4CD5FB 

4915 

INSCH5 . 

JMP DOLCOL 

F86D 

2085FC 

4920 

DELCHR , 

JSR PHACRS 

F870 

2047F9 

4925 

DELCH1 , 

JSR CONVRT 

F873 

A564 

4930 

LDA 

$64 

F875 

8568 

4935 

STA 

$68 

F877 

A565 

4940 

LDA 

$65 

F879 

8569 

4945 

STA 

$69 

F87B 

A563 

4950 

LDA 

$63 

F87D 

48 

4955 

PHA 


FB7E 

20D4F9 

4960 

JSR 

INCRSB 

F8S1 

68 

4965 

PLA 


F882 

0563 

4970 

CMP 

$63 

F884 

BO 10 

4975 

BCS 

DELCH2 

F886 

A554 

4980 

LDA 

$54 

F888 

CDBF02 

4985 

CMP 

$02BF 

F88B 

B009 

4990 

BCS 

DELCH2 

F88D 

20A2F5 

4995 

JSR 

GETPLT 

F890 

AO 00 

5000 

LDY 

#0 

F892 

9168 

5005 

STA 

($68) ,Y 

F894 

FODA 

5010 

BEQ 

DELCH1 

F896 

AOOO 

5015 

DELCH2 LDY #0 

F898 

98 

5020 

TYA 


F899 

9168 

5025 

STA 

($68) , Y 

FB9B 

2060FC 

5030 

JSR 

DELTIA 

F89E 

2090FC 

5035 

JSR 

PLACRS 

F8A1 

4CD5FB 

5040 

JMP 

DOLCOL 

F8A4 

38 

5045 

INSLIN SEC 

F8A5 

207BFB 

5050 

INSLIA JSR EXTEND 

F8A8 

A552 

5055 

LDA 

$52 

F8AA 

8555 

5060 

STA 

$55 

F8AC 

2047F9 

5065 

JSR 

CONVRT 

F8AF 

A564 

5070 

LDA 

$64 

FBB1 

8568 

5075 

STA 

$68 

F8B3 

18 

5080 

CLC 


F8B4 

6928 

5085 

ADC 

#40 

F8B6 

8566 

5090 

STA 

$66 

F8B8 

A565 

5095 

LDA 

$65 

FSB A 

8569 

5100 

STA 

$69 

F8BC 

6900 

5105 

ADC 

#0 

F8BE 

8567 

5110 

STA 

$67 

F8C0 

A654 

5115 

LDX 

$54 

F8C2 

E017 

5120 

CPX 

#23 

F8C4 

F008 

5125 

BEQ 

INSLI2 

F8C6 

204EFB 

5130 

INSLI1 JSR MOVLIN 

F8C9 

E8 

5135 

INX 


F8CA 

E017 

5140 

CPX 

#23 

F8CC 

D0F8 

5145 

BNE 

INSLI1 

F8CE 

209BFB 

5150 

INSLI2 JSR CLRLIN 

F8D1 

4CD5FB 

5155 

JMP 

DOLCOL 

F8D4 

20D5FB 

5160 

DELL IN JSR DOLCOL 

F8D7 

A451 

5165 

DELL I A LDY $51 

F8D9 

8454 

5170 

STY 

$54 

F8DB 

A454 

5175 

DELL IB LDY $54 
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FBDD 

98 

5180 

FSDE 

38 

5185 

FSDF 

2023FB 

5190 

FBE2 

08 

5195 

FSE3 

98 

5200 

FSE4 

18 

5205 

F8E5 

6978 

5210 

FBE7 

28 

5215 

FBEB 

2004FB 

5220 

FBEB 

C8 

5225 

FBEC 

CO 18 

5230 

FBEE 

DOED 

5235 

FBFO 

ADB402 

5240 

FSF3 

0901 

5245 

FBF5 

8DB402 

5250 

FBFB 

A552 

5255 

FBFA 

8555 

5260 

FSFC 

2047F9 

5265 

F8FF 

20B2FB 

5270 

F902 

2020FB 

5275 

F905 

90 D4 

5280 

F907 

4CD5FB 

5285 

F90A 

A020 

5290 

F90C 

20F2F0 

5295 

F90F 

88 

5300 

F910 

10FA 

5305 

F912 

60 

5310 

F913 

A902 

5315 

F915 

DOOA 

5320 

F917 

A44C 

5325 

F919 

30 2B 

5330 

F91B 

AOOO 

5335 

F91D 

9164 

5340 

F91F 

A901 

5345 

F921 

8D9E02 

5350 

F924 

A54C 

5355 

F926 

30 IE 

5360 

F92B 

A564 

5365 

F92A 

38 

5370 

F92B 

ED9E02 

5375 

F92E 

8564 

5380 

F930 

B002 

5385 

F932 

C665 

5390 

F934 

A50F 

5395 

F936 

C565 

5400 

F938 

900C 

5405 

F93A 

DO 06 

5410 

F93C 

A50E 

5415 

F93E 

C564 

5420 

F940 

9004 

5425 

F942 

A993 

5430 

F944 

854C 

5435 

F946 

60 

5440 

F947 

A554 

5445 

F949 

48 

5450 

F94A 

A555 

5455 

F94C 

48 

5460 

F94D 

A556 

5465 

F94F 

48 

5470 

F950 

20D4FC 

54/5 

F953 

A554 

5480 


DELL II TYA 


SEC 


JSR 

L02GET 

PHP 


TYA 


CLC 


ADC 

#120 

PLP 


JSR 

BITPUT 

I NY 


CPY 

#24 

BNE 

DELL 11 

LDA 

$02B4 

ORA 

#1 

STA 

$02B4 

DELL I 2 LDA $52 

STA 

$55 

JSR 

CONVRT 

JSR 

SCR0L1 

JSR 

LOGGET 

BCC 

DELL IB 

JMF' 

DOLCOL 


BELL LDY #$20 
BELLI JSR CLICK 
DEY 

BPL BELLI 
RTS 

DBDDEC LDA #2 
BNE DBSUB 
STORE LDY $4C 
BMI STROK 
LDY #0 

STORE 1 ST A ($64) , Y 
DBDEC LDA #1 
DBSUB STA $029E 
LDA $4C 
BMI STROK 
LDA $64 
SEC 

SBC $029E 
STA $64 
BCS DBSUB 1 
DEC $65 

DBSUB 1 LDA $0F 
CMP $65 
BCC STROK 
BNE STRERR 
LDA $0E 
CMP $64 
BCC STROK 
STRERR LDA #$93 
STA $4C 
STROK RTS 
CONVRT LDA $54 
PHA 

LDA $55 
PHA 

LDA $56 
PHA 

JSR PUTMSC 
LDA $54 
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F955 

8566 

5485 

STA 

$66 

F957 

A900 

5490 

LDA 

#0 

F959 

8567 

5495 

STA 

$67 

F95B 

A566 

5500 

LDA 

$66 

F95D 

OA 


ASL 

A 

F95E 

2667 

5510 

ROL 

$67 

F960 

8551 

5515 

STA 

$51 

F962 

A467 

5520 

LDY 

$67 

F964 

8C9F02 

5525 

STY 

$029F 

F967 

OA 

5530 

ASL 

A 

F968 

2667 

5535 

ROL 

$67 

F96A 

OA 

5540 

ASL 

A 

F96B 

2667 

5545 

ROL 

$67 

F96D 

18 

5550 

CLC 


F96E 

6551 

5555 

ADC 

$51 

F970 

8566 

5560 

STA 

$66 

F972 

A567 

5565 

LDA 

$67 

F974 

6D9F02 

5570 

ADC 

$029F 

F977 

8567 

5575 

STA 

$67 

F979 

A657 

5580 

LDX 

$57 

F97B 

BC75FE 

5585 

LDY 

DHLINE, X 

F97E 

88 

5590 

CONOR 1 DEY 

F97F 

3007 

5595 

BMI 

C0N0R2 

F981 

0666 

5600 

ASL 

$66 

F983 

2667 

5605 

ROL 

$67 

F985 

4C7EF9 

561 0 

JMP 

CONOR 1 

F988 

BCA5FE 

5615 

C0N0R2 LDY D I 02TB 

F98B 

A555 

5620 

LDA 

$55 

F9SD 

A207 

5625 

LDX 

#7 

F98F 

88 

5630 

C0N0R3 DEY 

F990 

300 A 

5635 

BMI 

CONOR4 

F992 

CA 

5640 

DEX 


F993 

4656 

5645 

LSR 

$56 

F995 

6A 

5650 

ROR 

A 

F996 

6EA102 

5655 

ROR 

$02A1 

F999 

4C8FF9 

5660 

JMP 

CONOR3 

F99C 

08 

5665 

C0N0R4 I NY 

F99D 

18 

5670 

CLC 


F99E 

6566 

5675 

ADC 

$66 

F9A0 

8566 

5680 

STA 

$66 

F9A2 

9002 

5685 

BCC 

CONORS 

F9A4 

E667 

5690 

INC 

$67 

F9A6 

38 

5695 

CONORS SEC 

F9A7 

6EA102 

5700 

C0N0R6 ROR $02 A 1 

F9AA 

18 

5705 

CLC 


F9AB 

CA 

5710 

DEX 


F9AC 

10F9 

5715 

BF'L 

C0N0R6 

F9AE 

AEA102 

5720 

LDX 

$02A1 

F9B1 

A566 

5725 

LDA 

$66 

F9B3 

IS 

5730 

CLC 


F9B4 

6564 

5735 

ADC 

$64 

F9B6 

8564 

5740 

STA 

$64 

F9B8 

85 5E 

5745 

STA 

$5E 

F9BA 

A567 

5750 

LDA 

$67 

F9BC 

6565 

5755 

ADC 

$65 

F9BE 

8565 

5760 

STA 

$65 

F9C0 

855F 

5765 

STA 

$5F 

F9C2 

BDB5FE 

5770 

LDA 

DMASKT, X 

F9C5 

8DA002 

5775 

STA 

$02A0 

F9C8 

856F 

5780 

STA 

$6F 

F9CA 

68 

5785 

PLA 
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F9CB 

8556 

5790 

ST A $56 

F9CD 

68 

5795 

PLA 

F9CE 

8555 

5800 

STA $55 

F9D0 

68 

5805 

PLA 

F9D1 

8554 

5810 

STA $54 

F9D3 

60 

5815 

RTS 

F9D4 

A900 

5820 

INCRSB LDA #0 

F9D6 

F002 

5825 

BEQ INCRSC 

F9D8 

A99B 

5830 

INCRSR LDA *$9B 

F9DA 

857D 

5835 

INCRSC STA $7D 

F9DC 

E663 

5840 

INCRSA INC $63 

F9DE 

C- Q i ! 1 f 

5845 

INC $55 

F9E0 

D002 

5850 

BNE INCSR2 

F9E2 

E656 

5855 

INC $56 

F9E4 

A555 

5860 

INCSR2 LDA $55 

F9E6 

A657 

5865 

LDX $57 

F9E8 

DD85FE 

5870 

CMP COLUMN, X 

F9EB 

FOOB 

5875 

BEQ INC2A 

F9ED 

EOOO 

5880 

CPX #0 

F9EF 

D006 

5885 

BNE INCRS3 

F9F1 

WiJ w)%j 

5890 

CMP $53 

F9F3 

F002 

5895 

BEQ INCRS3 

F9F5 

B001 

5900 

BCS INC2A 

F9F7 

60 

5905 

INCRS3 RTS 

F9F8 

E008 

5910 

INC2A CPX #8 

F9FA 

9004 

5915 

BCC DOCR1 

F9FC 

A556 

5920 

LDA $56 

F9FE 

F0F7 

5925 

BEQ INCRS3 

FA00 

A557 

5930 

D0CR1 LDA $57 

FA02 

DO 30 

5935 

BNE DOCR 

FA04 

A563 

5940 

LDA $63 

FA06 

C951 

5945 

CMP #81 

FA08 

900 A 

5950 

BCC DOCR IB 

FAOA 

A57D 

5955 

LDA $7D 

FAOC 

F026 

5960 

BEQ DOCR 

FACE 

2030FA 

5965 

JSR DOCRWS 

FAli 

4C77FA 

5970 

JMP INCRS1 

FA14 

2034FA 

5975 

DOCR IB JSR DOCR 

FA17 

A554 

5980 

LDA $54 

FA19 

18 

5985 

CLC 

FA1 A 

6978 

5990 

ADC #120 

FA 1C 

2025FB 

5995 

JSR BITGET 

FA1F 

9008 

6000 

BCC DOCR 1 A 

FA21 

A57D 

6005 

LDA $7D 

FA23 

F004 

6010 

BEQ DOCR 1 A 

FA25 

18 

6015 

CLC 

FA26 

20A5F8 

6020 

JSR 1NSLIA 

FA29 

4CD5FB 

6025 

DOCR 1 A JMP DOLCOL 

FA2C 

A900 

6030 

NOSCRL LDA #0 

FA2E 

F002 

6035 

BEQ N0SCR1 

FA30 

A99B 

6040 

DOCRWS LDA #$9B 

FA32 

857D 

6045 

N0SCR1 STA $7D 

FA34 

20FEF0 

6050 

DOCR JSR COLCR 

FA37 

A 9 00 

6055 

LDA #0 

FA39 

8556 

6060 

STA $56 

FA3B 

E654 

6065 

INC $54 

FA3D 

A657 

6070 

D0CR2 LDX $57 

FA3F 

AO 18 

6075 

LDY #24 

FA41 

24 7B 

6080 

BIT $7B 

FA43 

1005 

6085 

BPL D0CR2A 

FA45 

A004 

6090 

LDY #4 
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FA47 

98 

6095 

FA48 

D003 

6100 

FA4A 

BD95FE 

6105 

FA4D 

C554 

6110 

FA4F 

DO 26 

6115 

FA51 

8C9D02 

6120 

FA54 

8A 

6125 

FA55 

DO 20 

6 1 30 

FA57 

A57D 

6135 

FA59 

F01C 

6140 

FA5B 

C99B 

6145 

FA5D 

38 

6150 

FA5E 

F001 

6155 

FA60 

18 

6160 

FA61 

20ACFB 

6165 

FA64 

EEBB02 

6170 

FA67 

C66C 

6175 

FA69 

CE9D02 

6180 

FA6C 

ADB202 

6185 

FA6F 

38 

6190 

FA70 

10EF 

6195 

FA72 

AD9D02 

6200 

FA75 

8554 

6205 

FA77 

4CD5FB 

6210 

FA7A 

38 

6215 

FA7B 

B570 

6220 

FA7D 

E574 

6225 

FA7F 

9570 

6230 

FA81 

B571 

6235 

FA83 

E575 

6240 

FA85 

9571 

6245 

FA87 

60 

6250 

FA88 

ADBF02 

6255 

FA8B 

C904 

6260 

FA8D 

F007 

6265 

FA8F 

A557 

6270 

FA91 

F003 

6275 

FA93 

20FCF3 

6280 

FA96 

A927 

6285 

FA9B 

C553 

6290 

FA9A 

B002 

6295 

FA9C 

8553 

6300 

FA9E 

A657 

6305 

FAAO 

BD95FE 

6310 

FAA3 

C554 

6315 

FAA5 

90 2 A 

6320 

FAA7 

F028 

6325 

FAA9 

E008 

6330 

FAAB 

DOOA 

6335 

FAAD 

A556 

6340 

FAAF 

F013 

6345 

FAB1 

C901 

6350 

FAB3 

DO 1C 

6355 

FAB5 

F004 

6360 

FAB7 

A556 

6365 

FAB9 

DO 16 

6370 

FABB 

BD85FE 

6375 

FABE 

C555 

6380 

FACO 

900F 

6385 

FAC2 

FOOD 

6390 

FAC4 

A90 1 

6395 


TYA 

BNE D0CR2B 
D0CR2A LDA NOROWS, X 
D0CR2B CMP $54 
BNE INCRS1 
STY $029 D 
TXA 

BNE INCRS1 
LDA $7D 
BEQ INCRS1 
CMP #$9B 
SEC 

BEQ D0CR4B 
CLC 

D0CR4B JSR SCROLL 
INC $02BB 
DEC $6C 
DEC $029D 
LDA $02B2 
SEC 

BPL D0CR4B 
LDA $029D 
STA $54 

INCRS1 JMP DOLCOL 
SUBEND SEC 

LDA *70, X 
SBC $74 
STA $70, X 
LDA $71, X 
SBC $75 
STA $71, X 
RTS 

ERANGE LDA $02BF 
CMP #4 
BEQ RANGE 
LDA $57 
BEQ RANGE 
JSR EOPEN 
RANGE LDA #39 
CMP $53 
BCS RANGES 
STA $53 

RANGES LDX $57 

LDA NOROWS, X 
CMP $54 
BCC RNGERR 
BEQ RNGERR 
CPX #8 
BNE RANGE 1 
LDA $56 
BEQ RNGOK 
CMP #1 
BNE RNGERR 
BEQ RANGE2 
RANGE 1 LDA $56 
BNE RNGERR 
RANGE2 LDA COLUMN, X 
CMP $55 
BCC RNGERR 
BEQ RNGERR 
RNGOK LDA #1 
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FAC6 

854C 

6400 

STA $4C 

FACS 

A980 

6405 

LDA #$80 

FACA 

A611 

6410 

LDX $11 

FACC 

8511 

64 1 5 

STA $11 

FACE 

F006 

6420 

BEQ RNGER2 

FADO 

60 

6425 

RTS 

FAD1 

20D6F7 

6430 

RNGERR JSR HOME 

FAD4 

A9BD 

6435 

LDA #$8D 

FAD6 

854C 

6440 

RNGER2 STA $4C 

FADS 

68 

6445 

RNGER1 PL A 

FAD9 

68 

6450 

PLA 

FADA 

A57B 

6455 

LDA $7B 

FADC 

1003 

6460 

BPL RETUR3 

FADE 

20A1FC 

6465 

JSR SWAP A 

FAE1 

4C34F6 

6470 

RETUR3 JMP RETURi 

FAE4 

AO 00 

6475 

OFFCRS LDY #0 

FAE6 

A55D 

6480 

LDA $5D 

FAE8 

915E 

6485 

STA ($5E) , Y 

FAEA 

60 

6490 

RTS 

FAEB 

48 

6495 

BITCON PHA 

FAEC 

2907 

6500 

AND #7 

FAEE 

AA 

6505 

TAX 

FAEF 

BDBDFE 

6510 

LDA MASKTB, X 

FAF2 

856E 

6515 

STA $6E 

FAF4 

68 

6520 

PLA 

FAF5 

4A 

6525 

LSR A 

FAF6 

4A 

6530 

LSR A 

FAF7 

4A 

6535 

LSR A 

FAFS 

AA 

6540 

TAX 

FAF9 

60 

6545 

RTS 

FAFA 

2EB402 

6550 

BITROL ROL $02B4 

FAFD 

2EB302 

6555 

ROL $02B3 

FBGO 

2EB202 

6560 

ROL $02B2 

FB03 

60 

O ' — J L — 1 tJ 

RTS 

FB04 

900C 

6570 

BITPUT BCC BITCLR 

FB06 

20EBFA 

6575 

B1TSET JSR BITCON 

FB09 

BDA302 

6580 

LDA $02A3, X 

FBOC 

056E 

6585 

ORA $6E 

FBOE 

9DA302 

6590 

STA $02A3, X 

FBI 1 

60 

6595 

RTS 

FB12 

20EBFA 

6600 

BITCLR JSR BITCON 

FB15 

A56E 

6605 

LDA $6E 

FBI 7 

49FF 

6610 

EOR #$FF 

FB19 

3DA302 

6615 

AND $02A3, X 

FB1C 

9DA302 

6620 

STA $02A3, X 

FB1F 

60 

6625 

RTS 

FB20 

A554 

6630 

LOGGET LDA $54 

FB22 

18 

6635 

L01GET CLC 

FB23 

6978 

6640 

L02GET ADC #120 

FB25 

20EBFA 

6645 

BITGET JSR BITCON 

FB28 

IS 

6650 

CLC 

FB29 

BDA302 

6655 

LDA $02 A3, X 

FB2C 

256E 

6660 

AND $6E 

FB2E 

F001 

6665 

BEQ B1TGE1 

FB30 

38 

6670 

SEC 

FB31 

60 

6675 

BITGE1 RTS 

FB32 

ADFA02 

6680 

I NAT AC LDA $02FA 

FB35 

A457 

6685 

LDY $57 

FB37 

C003 

6690 

CPY #3 

FB39 

BOOF 

6695 

BCS INATA1 

FB3B 

2A 

6700 

ROL A 
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FB3C 

2A 

6705 

FB3D 

2A 

6710 

FB3E 

2A 

6715 

FB3F 

2903 

6720 

FB41 

AA 

6725 

FB42 

ADFA02 

6730 

FB45 

299F 

6735 

FB47 

1DF4FF 

6740 

FB4A 

8DFB02 

6745 

FB4D 

60 

6750 

FB4E 

A902 

6755 

FB50 

8565 

6760 

FB52 

A947 

6765 

FB54 

8564 

6770 

FB56 

AO 27 

6775 

FB5S 

B166 

6780 

FB5A 

8550 

6785 

FB5C 

B16B 

6790 

FB5E 

9166 

6795 

FB60 

AS 50 

6800 

FB62 

9164 

6805 

FB64 

88 

6810 

FB65 

10F1 

6815 

FB67 

A565 

6820 

FB69 

8569 

6825 

FB6B 

A564 

6830 

FB6D 

8568 

6835 

FB6F 

18 

6840 

FB70 

A566 

6845 

FB72 

6928 

6850 

FB74 

8566 

6855 

FB76 

9002 

6860 

FB78 

E667 

6865 

FB7A 

60 

6870 

FB7B 

08 

6875 

FB7C 

AO 1 7 

6880 

FB7E 

98 

6885 

FB7F 

2022FB 

6890 

FB82 

08 

6895 

FB83 

98 

6900 

FB84 

18 

6905 

FB85 

6979 

6910 

FB87 

28 

6915 

FB88 

2004FB 

6920 

FB8B 

88 

6925 

FB8C 

3004 

6930 

FB8E 

C454 

6935 

FB90 

BOEC 

6940 

FB92 

A554 

6945 

FB94 

18 

6950 

FB95 

6978 

6955 

FB97 

28 

6960 

FB98 

4C04FB 

6965 

FB9B 

A552 

6970 

FB9D 

8555 

6975 

FB9F 

2047F9 

6980 

FBA2 

A027 

6985 

FBA4 

A900 

6990 

FBA6 

9164 

6995 

FBA8 

88 

7000 

FBA9 

10FB 

7005 


ROL 

A 

ROL 

A 

ROL 

A 

AND 

#3 

TAX 

LDA 

$02FA 

AND 

#$9F 

ORA 

INTATA, X 

INATA1 STA $02FB 

RTS 

MOOLIN LDA #2 

STA 

$65 

LDA 

#$47 

STA 

$64 

LDY 

#39 

M0VLI1 LDA ($66) 

STA 

$50 

LDA 

($68) ,Y 

STA 

($66) , Y 

LDA 

$50 

STA 

($64) , Y 

DEY 

BPL 

MOOLI 1 

LDA 

$65 

STA 

$69 

LDA 

$64 

STA 

$68 

CLC 

LDA 

$66 

ADC 

#40 

STA 

$66 

BCC 

MOOLI 2 

INC 

$67 


MOOLI 2 RTS 
EXTEND PHP 
LDY #23 
EXTEN1 TYA 

JSR L01GET 

PHP 

TYA 

CLC 

ADC #121 
PLP 

JSR BITPUT 
EX TENS DEY 

BMI EXTEN4 
CPY $54 
BCS EXTEN1 
EXTEN4 LDA $54 
CLC 

ADC #120 
PLP 

JMP BITPUT 
CLRLIN LDA $52 
STA $55 
JSR CONVRT 
LDY #39 
LDA #0 

CLRLI1 STA ($64) , Y 
DEY 

BPL CLRLI1 
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FBAEt 

60 

7010 

RTS 


FBAC 

20FAFA 

7015 

SCROLL JSR BITROL 

FBAF 

20D4FC 

7020 

JSR 

PUTMSC 

FBB2 

AO 28 

7025 

SCR0L1 LDY #40 

FBB4 

B164 

7030 

LDA 

($64) , Y 

FB86 

A66A 

7035 

LDX 

$6A 

FBB8 

CA 

7040 

DEX 


FBB9 

E465 

7045 

CPX 

$65 

FBBB 

D008 

7050 

BNE 

SCR0L2 

FBBD 

A2D7 

7055 

LDX 

#$D7 

FBBF 

E464 

7060 

CPX 

$64 

FBC1 

B002 

7 065 

BCS 

SCR0L2 

FBC3 

A900 

7070 

LDA 

#0 

FBC5 

AO 00 

7075 

SCR0L2 LDY #0 

FBC7 

9164 

7080 

STA 

($64) , Y 

FBC9 

E664 

7085 

INC 

$64 

FBCB 

DOES 

7090 

BNE 

SCR0L1 

FBCD 

E665 

7095 

INC 

$65 

FBCF 

A565 

7100 

LDA 

$65 

FBD1 

C56A 

7105 

CMP 

$6A 

FBD3 

DODD 

7110 

BNE 

SCR0L1 

FBD5 

A900 

7115 

DOLCOL LDA #0 

FBD7 

8563 

7 1 20 

STA 

$63 

FBB9 

A554 

7125 

LDA 

$54 

FBDB 

8551 

7130 

STA 

$51 

FBDD 

A55 1 

7135 

D0LC01 LDA $51 

FBDF 

2022FB 

7140 

JSR 

L01GET 

FBE2 

BOOC 

7145 

BCS 

D0LC02 

FBE4 

A563 

7150 

LDA 

$63 

FBE6 

18 

7155 

CLC 


FBE7 

6928 

7160 

ADC 

#40 

FBE9 

8563 

7165 

STA 

$63 

FBEB 

C651 

7170 

DEC 

$51 

FBED 

4CDDFB 

7175 

JMF' 

D0LC01 

FBFO 

18 

7180 

D0LC02 CLC 

FBF 1 

A563 

7185 

LDA 

$63 

FBF3 

6555 

7190 

ADC 

$55 

FBF5 

8563 

7195 

STA 

$63 

FBF7 

60 

7200 

RTS 


FBFB 

2085FC 

7205 

DOBUFC JSR PHACRS 

FBFB 

A563 

7210 

LDA 

$63 

FBFD 

48 

7215 

PH A 


FBFE 

A56C 

7220 

LDA 

$6C 

FCOO 

8554 

7225 

STA 

$54 

FC02 

A56D 

7230 

LDA 

$6D 

FC04 

I i i—l i — ! ' — f 

7235 

STA 

$55 

FC06 

A901 

7240 

LDA 

#1 

FC08 

856B 

7245 

STA 

$6B 

FCOA 

A217 

7250 

D0BUF1 LDX #23 

FCOC 

A57B 

7255 

LDA 

$7B 

FCOE 

1 002 

7260 

BPL 

D0B1 

FCIO 

A203 

7265 

LDX 

#3 

FC12 

E454 

7270 

D0B1 CPX $54 

FC14 

DOOB 

7275 

BNE 

D0BU1 A 

FC16 

A555 

7280 

LDA 

$55 

FC18 

0553 

7285 

CMP 

$53 

FC1 A 

DO 05 

7290 

BNE 

D0BLI1 A 

FC1C 

E66B 

7295 

INC 

$6B 

FC1E 

4C31FC 

7300 

JMP 

D0BUF2 

FC21 

20D4F9 

7305 

D0BU1A , 

JSR INCRSB 

FC24 

E66B 

7310 

INC 

$6B 
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FC26 

A563 

7315 

LDA $63 

FC28 

0552 

7320 

CMP $52 

FC2A 

DO BE 

7325 

BNE D0BUF1 

FC2C 

0654 

7330 

DEC $54 

FC2E 

2099F7 

7335 

JSR CRBRLF 

FC31 

20A2F5 

7340 

D0BUF2 JSR GETPLT 

FC34 

DO 17 

7345 

BNE D0BUF4 

FC36 

C66B 

7350 

DEC $6B 

FC38 

A563 

7355 

LDA $63 

FC3A 

0552 

7360 

CMP $52 

FC3C 

FOOF 

7365 

BEQ D0BUF4 

FC3E 

2099F7 

7370 

JSR CRSRLF 

FC41 

A555 

7375 

LDA $55 

FC43 

0553 

7380 

CMP $53 

FC45 

D002 

7385 

BNE D0BUF3 

FC47 

0654 

7390 

DEC $54 

FC49 

A56B 

7395 

D0BUF3 LDA $6B 

FC4B 

D0E4 

7400 

BNE D0BUF2 

FC4D 

68 

7405 

D0BUF4 PLA 

FC4E 

8563 

7410 

ST A $63 

FC50 

2090FC 

7415 

JSR PLACRS 

FC53 

60 

7420 

RTS 

FC54 

20D5FB 

7425 

STRBEG JSR DOLCOL 

FC57 

A551 

7430 

LDA $51 

FC59 

8560 

7435 

STA $60 

FC5B 

A552 

7440 

LDA $52 

FC5D 

856D 

7445 

STA $6D 

FC5F 

60 

7450 

RTS 

FC60 

A563 

7455 

BELT I A LDA $63 

FC62 

0552 

7460 

CMP $52 

FC64 

DO 02 

7465 

BNE BELT IB 

FC66 

0654 

7470 

DEC $54 

FC68 

20D5FB 

7475 

DELTIB JSR DOLCOL 

FC6B 

A563 

7480 

DELTIM LDA $63 

FC6D 

0552 

7485 

CMP $52 

FC6F 

F013 

7490 

BEQ BELT I 3 

FC7 1 

2047F9 

7495 

JSR CONVRT 

FC74 

A553 

7500 

LDA $53 

FC76 

38 

7505 

SEC 

FC77 

E552 

7510 

SBC $52 

FC79 

A8 

7515 

TAY 

FC7A 

B164 

7520 

DELTI1 LDA ($64) , Y 

FC7C 

D006 

7525 

BNE BELT I 3 

FC7E 

88 

7530 

DEY 

FC7F 

10F9 

7535 

BPL BELT 11 

FC81 

4CDBF8 

7540 

DELTI2 JMP DELL IB 

FC84 

60 

7545 

DELTI3 RTS 

FC85 

A202 

7550 

PHACRS LDX #2 

FC87 

B554 

7555 

PHACR1 LDA $54, X 

FC89 

9DB802 

7560 

STA $0288, X 

FC8C 

CA 

7565 

DEX 

FC8D 

10F8 

7570 

BPL PNACR1 

FC8F 

60 

7575 

RTS 

FC90 

A202 

7580 

PLACRS LDX #2 

FC92 

BDB802 

7585 

PLACR1 LDA $02B8, X 

FC95 

9554 

7590 

STA $54, X 

FC97 

CA 

7595 

DEX 

FC98 

10F8 

7600 

BPL PLACR1 

FC9A 

60 

7605 

RTS 

FC9B 

20A1FC 

7610 

SWAP JSR SWAPA 

FC9E 

4C34F6 

7615 

JMP RETUR1 



PAGE 

26 QSNFV601 



FCA1 

ADBF02 

7620 

SWAPA LBA $02BF 

FCA4 

C918 

7625 

CMP 

#24 

FCA6 

F017 

7630 

BEQ 

SWAP3 

FCAS 

A20B 

7635 

LBX 

#11 

FCAA 

B554 

7640 

SWAP1 LBA $54, X 

• 

FCAC 

48 

7645 

PHA 


FCAD 

BD9UG2 

7650 

LBA 

$0290, X 

FCBO 

9554 

7655 

ST A 

$54, X 

FCB2 

68 

7660 

PLA 


FCB3 

9D9002 

7665 

STA 

$0290, X 

FCB6 

CA 

7670 

BEX 


FCB7 

10F 1 

7675 

BPL 

SWAP 1 

FCB9 

A57B 

7680 

LBA 

$7B 

FCBB 

49FF 

7 685 

EOR 

#$FF 

FCBD 

857B 

7690 

STA 

$7B 

FCBF 

60 

7695 

SWAP3 RTS 

FCCO 

A54B 

7700 

GETSEC LBA $4B 

FCC2 

F003 

7705 

BEQ 

BISKM 

FCC4 

4C7AE4 

7710 

JMP 

$E47A 

FCC7 

A952 

7715 

BISKM LBA #$52 

FCC9 

8D0203 

7720 

STA 

$0302 

FCCC 

A901 

7725 

LBA 

#1 

FCCE 

8D0103 

7730 

STA 

$0301 

FCD1 

4C53E4 

7735 

JMP 

$E453 

FCD4 

A558 

7740 

PUTMSC LBA $58 

FCB6 

8564 

7745 

STA 

$64 

FCBB 

A559 

7750 

LBA 

$59 

FCDA 

8565 

7755 

STA 

$65 

FCDC 

60 

7760 

RTS 


FCDD 

A200 

7765 

BRAW LBX 

: #0 

FCDF 

A522 

7770 

LBA 

$22 

FCEi 

C91 1 

7775 

CMP 

#$11 

FCE3 

F008 

7780 

BEQ 

BRAWA 

FCE5 

C912 

7785 

CMP 

#$i2 

FCE7 

F003 

7790 

BEQ 

BRAWB 

FCE9 

A084 

7795 

LBY 

#$B4 

FCEB 

60 

7800 

RTS 


FCEC 

E8 

7805 

BRAWB I NX 

FCED 

8EB702 

7810 

BRAWA STX $02B7 

FCFO 

A554 

7815 

LBA 

$54 

FCF2 

8560 

7820 

STA 

$60 

FCF4 


7825 

LBA 

$55 

FCF6 

8561 

7830 

STA 

$61 

FCFB 

A556 

7835 

LBA 

$56 

FCFA 

8562 

7840 

STA 

$62 

FCFC 

A901 

7845 

LBA 

#1 

FCFE 

8579 

7850 

STA 

$79 

FOOD 

857 A 

7855 

STA 

$7A 

FD02 

38 

7860 

SEC 


FD03 

A560 

7865 

LBA 

$60 

FD05 

E55A 

7870 

SBC 

$5A 

FD07 

8576 

7875 

STA 

$76 

FD09 

BOOB 

7880 

BCS 

BRAW1 

FDOB 

A9FF 

7885 

LBA 

#$FF 

FDOD 

8579 

7890 

STA 

$79 

FDOF 

A576 

7895 

LBA 

$76 

FD1 1 

49FF 

7900 

EOR 

#$FF 

FD1 3 

18 

7905 

CLC 


FD14 

6901 

7910 

ABC 

#1 

FB16 

8576 

7915 

STA 

$76 

FD18 

38 

7920 

BRAW1 SEC 
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FD19 

A561 

7925 

LDA 

$61 

FD1B 

E55B 

7930 

SBC 

$5B 

FD1D 

8577 

7935 

STA 

$77 

FD1F 

A562 

7940 

LDA 

$62 

FD21 

E55C 

7945 

SBC 

$5C 

FD23 

8578 

7950 

STA 

$78 

FD25 

BO 16 

7955 

BCS 

DRAW2 

FD27 

A9FF 

7960 

LDA 

#$FF 

FD29 

857A 

7965 

STA 

$7 A 

FD2B 

A577 

7970 

LDA 

$77 

FD2D 

49FF 

7975 

EOR 

#$FF 

FD2F 

8577 

7980 

STA 

$77 

FD31 

A578 

7985 

LDA 

$78 

FD33 

49FF 

7990 

EDR 

#$FF 

FD35 

8578 

7995 

STA 

$78 

FD37 

E677 

8000 

INC 

$77 

FD39 

DO 02 

8005 

BNE 

DRAW2 

FD3B 

E678 

8010 

INC 

$78 

FD3D 

A202 

8015 

DR AW 2 LDX #2 

FD3F 

AOOO 

8020 

LDY 

#0 

FD41 

8473 

8025 

STY 

$73 

FD43 

98 

8030 

DRAW3A TYA 

FD44 

9570 

8035 

STA 

$70, X 

FD46 

B55A 

8040 

LDA 

$5A, X 

FD48 

9554 

8045 

STA 

$54, X 

FD4A 

CA 

8050 

DEX 


FD4B 

10F6 

8055 

BPL 

DRAW3A 

FD4D 

A577 

8060 

LDA 

$77 

FD4F 

E8 

8065 

INX 


FD50 

AS 

8070 

TAY 


FD51 

A578 

8075 

LDA 

$78 

FD53 

857F 

8080 

STA 

$7F 

FD55 

8575 

8085 

STA 

$75 

FD57 

DOOA 

8090 

BNE 

DRAW3 

FD59 

A577 

8095 

LDA 

$77 

FD5B 

0576 

8 1 00 

CMP 

$76 

FD5D 

B004 

8105 

BCS 

DRAWS 

FD5F 

A476 

8110 

LDY 

$76 

FD61 

A202 

8115 

LDX 

#2 

FD63 

98 

8120 

DRAWS TYA 

FD64 

85 7E 

8125 

STA 

$7E 

FD66 

8574 

8130 

STA 

$74 

FD68 

48 

8135 

PHA 


FD69 

A575 

8140 

LDA 

$75 

FD6B 

4A 

8145 

LSR 

A 

FD6C 

68 

8150 

PLA 


FD6D 

6A 

8155 

ROR 

A 

FD6E 

9570 

8160 

STA 

$70, X 

FD70 

A57E 

8165 

DRAW4A LDA $7E 

FD72 

057F 

8170 

ORh 

$7F 

FD74 

DO 03 

8175 

BNE 

DRAW 1 1 

FD76 

4C22FE 

8180 

JliP 

DRAW 1 0 

FD79 

IS 

8185 

DR AW 11 CLC 

FD7A 

A570 

8190 

LDA 

$70 

FD7C 

6576 

8195 

ADC 

$76 

FD7E 

8570 

8200 

STA 

$70 

FD80 

9002 

8205 

BCC 

DRAWS 

FD82 

E671 

8210 

INC 

$71 

FD84 

A571 

8215 

DRAWS LDA $71 

FD86 

0575 

8220 

CMP 

$75 

FD88 

9014 

8225 

BCC 

DRAW6 
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FD8A 

D006 

8230 

BIME 

DRAW5A 

FD8C 

A570 

8235 

LDA 

$70 

FD8E 

0574 

8240 

CMP 

$74 

FD90 

9000 

8245 

BCC 

DRAW6 

FD92 

18 

8250 

DRAW5A 1 

CLC 

FD93 

A554 

8255 

LDA 

$54 

FD95 

6579 

8260 

ADC 

$79 

FD97 

8554 

8265 

STA 

$54 

FD99 

A200 

8270 

LDX 

#0 

FD9B 

207AFA 

8275 

JSR 

SUBEND 

FD9E 

18 

8280 

DRAW6 CLC 

FD9F 

A572 

8285 

LDA 

$72 

FDA1 

6577 

8290 

ADC 

$77 

FDA3 

8572 

8295 

STA 

$72 

FDA5 

A573 

8300 

LDA 

$73 

FDA7 

6578 

8305 

ADC 

$78 

FDA9 

8573 

8310 

STA 

$73 

FDAB 

0575 

8315 

CMP 

$75 

FDAD 

9027 

8320 

BCC 

DRAW8 

FDAF 

0006 

8325 

BNE 

DRAW6A 

FDB1 

A572 

8330 

LDA 

$72 

FDB3 

0574 

8335 

CMP 

$74 

FDB5 

90 IF 

8340 

BCC 

DRAW8 

FDB7 

247A 

8345 

DRAW6A BIT $7A 

FDB9 

1010 

8350 

BPL 

DRAW6B 

FDBB 

0655 

8355 

DEC 

$55 

FDBD 

A555 

8360 

LDA 

$55 

FDBF 

C9FF 

8365 

CMP 

#$FF 

FDC1 

DOOE 

8370 

BNE 

DRAW7 

FDC3 

A556 

8375 

LDA 

$56 

FDC5 

FOOA 

8380 

BEQ 

DRAW 7 

FDC7 

0656 

8385 

DEC 

$56 

FDC9 

1 006 

8390 

BPL 

DRAW7 

FDCB 

E655 

8395 

DRAW6B : 

INC $55 

FDCD 

DO 02 

8400 

BNE 

DRAW7 

FDCF 

E656 

8405 

INC 

$56 

FDD1 

A202 

8410 

DRAW7 LDX #2 

FDD3 

207AFA 

8415 

JSR 

SUBEND 

FDD6 

2096FA 

8420 

DRAWS JSR RANGE 

FDD9 

20E0F5 

8425 

JSR 

OUTPLT 

FDDC 

ADB702 

8430 

LDA 

$02B7 

FDDF 

F02F 

8435 

BEQ 

DRAW9 

FDE1 

2085FC 

8440 

JSR 

PHACRS 

FDE4 

ADFB02 

8445 

LDA 

$02FB 

FDE7 

8DBC02 

8450 

STA 

$02BC 

FDEA 

A554 

8455 

DRAW8A LDA $54 

FDEC 

48 

8460 

PHA 


FDED 

20DCF9 

8465 

JSR 

INCRSA 

FDFO 

68 

8470 

PLA 


FDF1 

8554 

8475 

STA 

$54 

FDF3 

2096FA 

8480 

DRAW8C JSR RANGE 

FDF6 

20A2F5 

8485 

JSR 

GETPLT 

FDF9 

DO 00 

8490 

BNE 

DRAW8B 

FDFB 

ADFD02 

8495 

LDA 

$02FD 

FDFE 

8DFB02 

8500 

STA 

$02FB 

FEOl 

20E0F5 

8505 

JSR 

OUTPLT 

FE04 

4CEAFD 

8510 

JMP 

DRAW8A 

FE07 

AD BO 02 

8515 

DRAW8B LDA $02BC 

FEOA 

8DFB02 

8520 

STA 

$02FB 

FEOD 

2090FC 

8525 

JSR 

PLACRS 

FEIO 

38 

8530 

DRAW9 SEC 
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FE1 1 

A57E 

8535 

LDA $7E 

FE1 3 

E901 

8540 

SBC #1 

FE15 

857E 

8545 

STA $7E 

FE17 

A57F 

8550 

LDA $7F 

FE19 

E900 

8555 

SBC #0 

FE1B 

85 7F 

8560 

STA $7F 

FE1D 

3003 

8565 

BMI DRAW 10 

FE1F 

4C70FD 

8570 

JMP DRAW4A 

FE22 

4C34F6 

8575 

DRAW 10 JMP RETUR1 

FE25 

18100A0A 

8580 

ALOCAT .BYTE 24, 16, 10, 10, 16, 28, 52, 100, 196, 196, 196, 196 

FE29 

101C3464 


FE2D 

C4C4C4C4 



FE31 

1C1064C4 

8585 

. BYTE 28, 16, 100, 196 

FE35 

17170B17 

8590 

NUMDLE -BYTE 23,23,11,23,47,47,95,95,97,97,97,97 

FE39 

2F2F5F5F 


FE3D 

61616161 



FE41 

170BBF61 

8595 

.BYTE 23,11, 191,97 

FE45 

13130913 

8600 

MXDMDE .BYTE 19,19,9,19,39,39,79,79,65,65,65,65 

FE49 

27274F4F 


FE4D 

41414141 



FE51 

13099F41 

8605 

-BYTE 19,9,159,65 

FE55 

02060708 

8610 

ANCGNV .BYTE 2,6,7,8,9,10,11,13,15,15,15,15 

FE59 

090A0B0D 


FE5D 

OF OF OF OF 



FE61 

04050C0E 

8615 

.BYTE 4,5, 12, 14 

FE65 

00000000 

8620 

PAGETB .BYTE 0, 0, 0, 0, 0, 0, 0, 1 , 1 , 1 . 1 , 1 

FE69 

00000001 


FE6D 

01010101 



FE7 1 

00000 101 

8625 

.BYTE 0,0, 1, 1 

FE75 

02010100 

8630 

DHL I WE .BYTE 2, 1 , 1 , 0, 0, 1 , 1 , 2, 2, 2, 2, 2 

FE79 

00010102 


FE7D 

02020202 



FEBi 

02020102 

8635 

. BYTE 2,2, 1,2 

FEB 5 

28141428 

8640 

COLUMN . BYTE 40, 20, 20, 40, 80, 80, 160, 160, 64, 80, 80, 80 

FEB9 

5050A0A0 


FEBD 

40505050 



FE91 

2828A0A0 

8645 

. BYTE 40, 40, 160, 160 

FE95 

1S1SOC18 

8650 

NOROWS .BYTE 24,24,12,24,48,48,96,96,192,192,192,192 

FE99 

30306060 


FE9D 

COCOCOCO 



FEA1 

180CC0C0 

8655 

.BYTE 24, 12, 192, 192 

FEA5 

00000002 

8660 

D1V2TB .BYTE 0, 6, 0, 2, 3, 2, 3, 2, 3, 1 , 1 , 1 

FEA9 

03020302 


FEAD 

03010101 



FEBI 

00000302 

8665 

.BYTE 0,0, 3, 2 

FEB5 

OOFFFOOF 

8670 

DMASKT .BYTE 0, $FF, $F0, $0F, $C0, *30, $0C, 3 

FEB9 

C0300C03 


FEBD 

80402010 

8675 

MASKTB .BYTE $80, $40, $20, $10, 8, 4, 2, 1 . 0, 1 , 3, 7 

FECI 

08040201 



FEC5 

00010307 



FEC9 

28CAB246 

8680 

COLRTB .BYTE $28, $CA, $B2, $46, 0 

FECD 

00 



FECE 

IB 

8685 

CNTRL.S .BYTE $1B 

FECF 

79F7 

8690 

.WORD ESCAPE 

FED1 

1C 

8695 

.BYTE $1C 

FED2 

7FF7 

8700 

.WORD CRSRUP 

FED4 

ID 

8705 

-BYTE $1D 

FEDS 

SCF7 

8710 

.WORD CRSRDN 

FED7 

IE 

8715 

.BYTE $1E 

FEDS 

99F7 

8720 

.WORD CRSRLF 

FEDA 

IF 

8725 

.BYTE $1 F 
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FEDB 

AAF7 

8730 

. WORD 

CRSRRT 

FEDD 

7D 

8735 

. BYTE 

$7D 

FEDE 

B9F7 

8740 

. WORD 

CLRSCR 

FEEO 

7E 

8745 

-BYTE 

$7E 

FEE1 

E6F7 

8750 

. WORD 

BS 

FEE3 

7F 

8755 

.BYTE 

$7F 

FEE4 

10F8 

8760 

. WORD 

TAB 

FEE6 

9B 

8765 

-BYTE 

$9B 

FEE7 

30 FA 

8770 

-WORD 

DOCRWS 

FEE9 

9C 

8775 

-BYTE 

$9C 

FEEA 

D4F8 

8780 

.WORD 

DELL I N 

FEEC 

9D 

8785 

. BYTE 

$9D 

FEED 

A4F8 

8790 

-WORD 

INSLIN 

FEEF 

9E 

8795 

.BYTE 

$9E 

FEFO 

32F8 

8800 

. WORD 

CLRTAB 

FEF2 

9F 

8805 

.BYTE 

$9F 

FEF3 

2DF8 

8810 

.WORD 

SETTAB 

FEF5 

FD 

8815 

. BYTE 

$FD 

FEF6 

0AF9 

8820 

. WORD 

BELL 

FEF8 

FE 

8825 

. BYTE 

$FE 

FEF9 

6DF8 

8830 

.WORD 

DELCHR 

FEFB 

FF 

8835 

-BYTE 

$FF 

FEFC 

37F8 

8840 

.WORD 

I NSC HR 

FEFE 

6C6A3BB0 

8845 

AT ASCI .BYTE $6C„ $6A, $3B, $80, $80, $6B, $2B, $2A 

FF02 

806B2B2A 




FF06 

6F80707S 

8850 

.BYTE 

$6F, $80, $70, $75, $9B, $69, $2D, $3D 

FFOA 

9B692D3D 



FFOE 

76806380 

8855 

. BYTE 

$76, $80, $63, $80, $80, $62, $78, $7A 

FF12 

8062787A 



FF16 

34803336 

8860 

. BYTE 

$34, $80, $33, $36, $1B, $35, $32, $31 

FF 1 A 

IB 35 32 31 



FF1E 

2C202E6E 

8865 

. BYTE 

$2C, $20, $2E, $6E, $80, $6D, $2F, $81 

FF22 

806D2F81 



FF26 

72806579 

8870 

.BYTE 

$72, $80, $65, $79, $7F, $74, $77, $71 

FF2A 

7F747771 



FF2E 

39803037 

8875 

. BYTE 

$39, $80, $30, $37, $7E, $38, $3C, $3E 

FF32 

7E383C3E 



FF36 

66686480 

8880 

. BYTE 

$66, $68, $64, $80, $82, $67, $73, $61 

FF3A 

82677361 



CCTC 

4C4A3A80 

8885 

.BYTE 

$4C, $4A, $3A, $80, $80, $4B, $5C, $5E 

FF42 

804B5C5E 



FF46 

4F805055 

8890 

. BYTE 

$4F, $80, $50, $55, $9B, $49, $5F, $7C 

FF4A 

9B495F7C 



FF4E 

56804380 

8895 

. BYTE 

$56, $80, $43, $80, $80, $42, $58, $5 A 

FF52 

8042585A 



FF56 

24802326 

8900 

.BYTE 

$24, $80, $23, $26, $1B, $25, $22, $21 

FF5A 

1B252221 



FF5E 

5B205D4E 

8905 

.BYTE 

$5B, $20, $5D, $4E, $80, $4D, $3F, $81 

FF62 

804D3F81 



FF66 

52804559 

8910 

.BYTE 

$52, $80, $45, $59, $9F, $54, $57, $51 

FF6A 

9F545751 



FF6E 

28802927 

8915 

. BYTE 

$28, $80, $29, $27, $9C, $40, $7D, $9D 

FF72 

9C407D9D 



FF76 

46484480 

8920 

.BYTE 

$46, $48, $44, $80, $83, $47, $53, $41 

FF7A 

83475341 




FF7E 

0C0A7B80 

8925 

.BYTE 

$0C, $0A, $7B, $80, $80, $0B, $1E, $1F 

FF82 

BOOB 1 E 1 F 



FF86 

OF 801015 

8930 

. BYTE 

$0F , $80, $10, $15, $9B, $09, $1C, $1D 

FF8A 

9B091C1D 



FF8E 

1 6800380 

8935 

. BYTE 

$16, $80, $03, $80, $80, $02, $18, $1 A 

FF92 

8002 1 8 1 A 
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Ff-96 80808580 8940 .BYTE $80, $80, $85, $80, $18, $80, $FD, *80 

FF9A 1B80FD80 

FF9E 0020600E 8945 .BYTE $00, $20, $60, $0E, $80, $0D, $80, $8l 

FFA2 800D8081 

FFA6 12800519 8950 .BYTE $12, $80, $05, $19, $9E, $14, $17, $1 1 

FFAA 9E 141711 

FFAE 80808080 8955 .BYTE $80, $80, $80, $80, $FE, $80, $7D, $FF 

FFB2 FE807DFF 

FFB6 06080480 8960 .BYTE $06, $08, $04, $80, $84, $07, $13, $Ol 

FFBA 84071301 

FFBE AD09D2 8965 PIRQ5 LDA $D209 

FFC1 CDF202 8970 CMF 1 $02F2 

FFC4 D005 8975 BNE PIRQ3 

FFC6 AD FI 02 8980 LDA $02F1 

FFC9 DO IE 8985 BNE PIRQ4 

FFCB AD09D2 8990 PIRQ3 LDA $D209 

FFCE C99F 8995 CMP #$9F 

FFDO DOOA 9000 BNE PIRQl 

FFD2 ADFF02 9005 LDA $02FF 

FFD5 49FF 9010 EOR #$FF 

FFD7 8DFF02 9015 ST A $02FF 

FFDA BOOD 9020 BCS PIRG4 

FFDC 8DFC02 9025 PIRQl STA $02FC 

FFDF 8DF202 9030 STA $02F2 

FFE2 A901 9035 LDA #1 

FFE4 8DF102 9040 STA $02F1 

FFE7 854D 9045 STA $4D 

FFE9 A910 9050 PIRQ4 LDA #$10 

FFEB 8D2B02 9055 STA $022B 

FFEE 68 9060 PIRQ2 F'LA 

FFEF 40 9065 RTI 
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F05A BEEP1 
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BEEP 1 LDA $14 

F05C 

18 

0230 

CLC 

F05D 

69 IE 

0235 

ADC #30 

F ubF 

A A 

0240 

TAX 

F060 

A9FF 

0245 
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DOFD 

0290 
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F07A 

FOOD 

0310 

BEQ WFAK 

F07C 

BA 

03 1 S 

TXA 

F07D 

18 

0320 
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F07E 

6 90 A 

0325 

ADC #10 

F 080 

A A 

0330 

TAX 

FOB 1 

E4 1 4 

0335 

CPX $ :L 4 

F083 

DOFC 

0340 

BNE #~2 

F085 

F0D3 

0345 

BEQ BEEP 1 

F087 

2O8CF0 

0350 
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FOB A 

9B 

0355 

TYA 

fo 8 b 
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0360 

RTS 

Foac 
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0365 
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F08F 

48 
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PH A 
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AD24E4 
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EDA $E424 

F093 

48 

0380 

PH A 

F094 

60 

0385 

RTS 

F095 

8D0203 

0390 

SIOSB ST A TO 30 2 

F09S 

A 9 00 

0395 

EDA #0 

F09A 

81)0903 

0400 

ST A $0309 

F09D 

A 983 

0405 

EDA #131 

F09F 

8 DOS 03 

04 1 0 

STA $0308 

F0A2 

A 903 

04 1 5 

LDA #3 

F0A4 

8D0503 

0420 

STA $0305 

F0A7 

A9FD 

0425 

EDA #$FD 

F0A9 

8 DO 4 03 

0430 

STA $0304 

FOAC 

A 960 

0435 

CSIO LDA #$60 

FOAE 

8D0003 

0440 

STA $0300 

FOB 1 

A 900 

0445 

LDA #0 

FOBS 

8 DO 1 03 

0450 

STA $0301 

fob 6 

A923 

0455 

EDA #35 

FOBS 

8D0603 

0460 

STA $0306 

FOBB 

A DO 203 

0465 

EDA $0302 

FOBE 

A 040 

0470 

LDY #$40 

FOCO 
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0475 

CMP #$52 

F0C2 

F 002 

0480 

BEQ #+4 

F0C4 

AOBO 

0485 

LDY #$S0 

F0C6 

8C0303 

0490 

STY $0303 

F0C9 

A53E 

0495 

LDA $3E 

FOCB 

8 DOB 03 
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0505 

JSR $E459 

FOD 1 

60 

05 1 0 

RTS 

F0D2 
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0515 

WSIOSB STA $03FF 

FOD 5 

A 955 
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LDA #$55 

FOD 7 
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STA $03FD 

FOD A 

8DFE03 

0530 
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FOOD 
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0535 

LDA #$57 
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0540 
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RTS 

F0E3 

50 

0550 

TBLENT .BYTE *P ’ 
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FOE 8 

43 

0560 

. BYTE ’ C 

FOE 7 

40E4 
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F0E9 

45 
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. BYTE ? E 

FOEA 
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0585 
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FOEF 

4B 

0590 

.BYTE ’K 
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F0F7 
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0615 

STX 
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CA 
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DE X 
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BPL 
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FOFD 

60 
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FOFE 
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CGLCR U 
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0640 
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F 1 04 

A657 
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BNE 
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#$0C 
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JSR 
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F3.D6 
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DOP'D 
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F 1 F5 

0DFD9F 

1 2 1 5 
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$9FFD 

F 1 1“ 8 
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NOB 1 JSI 
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FIFE 

EA 
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NOP 


f i fc 

20CFF2 
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NOCART . 

JSR BOOT 

F 1 FF 

A900 
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•I. 

NQBOOT EDA #0 
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81)4402 

1240 
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$0244 

F204 

A506 
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EDA 
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F206 

FOOA 
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NQA2 
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ADFDBF 
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LDA 

*BFFD 
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2904 
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#4 

F20D 
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LDA 
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44 
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1305 
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4C23F2 
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A22D 
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BDCEFE 
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F22E 

CDFB02 
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CMP 

$02FB 
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CA 
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DEX 
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CA 
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CA 
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1355 

BPL. 
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60 
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F239 

6CFEBF 
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F244 
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CMP 

($05) Y 

F267 

DOOD 

1 460 

BNE 

ENDRAM 
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F280 

9D00D2 
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S 1 A 
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F2S3 
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1 540 
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60 
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F2SA 
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#*54 

F28E 
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A9E7 
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8D3702 
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LDA 

*06 
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J SR 

*E40C 
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$E43C 
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F2CC 
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F2D3 
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60 
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F2DD 
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LDA 

#1 

F2F7 

80 0 AO 3 

1 780 

ST A 

$030 A 

F2FA 

A 904 

1785 
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BEQ DOBOOT 
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1 895 
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BNE BADDSK 

F358 FOP" 2 

2000 

BEQ SECTX 

F35A A54B 

2005 

ENBOOT LDA $4B 
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$09 

F3C4 

A50C 

2250 

1.... Jj A 

$oc 

F3C6 

8502 

cr 
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F3DC 

A940 

2305 

LDA 

#$40 
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F3E1 
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F42C 

05 1 0 

2490 


OR A 

$ 1 0 
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4600 

ST A 

$6D 

F7DD 

A 900 

4605 

LDA 

#0 

F7DF 

8554 

46 1 0 

STA 

$54 

F7E1 

8556 

46 1 5 

ST A 

$56 

F7E3 

856C 

4620 

STA 

$6C 

F7E5 

60 

4625 

RTS 


F /L6 

A 56 3 

4630 

BS LDA 

$63 

F7E8 

0552 

4635 

CMP 

$52 

F7EA 

F02 1 

4640 

BEQ 

BS 1 

F7EC 

s\ ccr c:r c 
H-JJJ 

4645 

BSA LDA 

$55 

F7EE 

0552 

4650 

CMP 

$52 

F7F0 

DO 03 

4655 

BIME 

BS3 

F7F2 

206BFC 

4660 

J SR 

DEL. T I M 

F7F5 
1” 7 1" hi 

2099F7 
A 555 

4665 
46 70 

BS3 J SR 
LDA 

CRSRLF 

if IT 

F7FA 

F7FC 

r i”r -:«• 

l j -J --J 

D007 

4675 

4680 

CMP 

BIME 

$53 

BS2 

F7FE 

A 55 4 

4685 

LDA 

$54 

F800 

FOG 3 

4690 

BEQ 

BS2 

F802 

207FF7 

4695 

J SR 

CRSRUP 

F805 

A920 

4700 

BS2 LDA 

#{$20 

F807 

8DFB02 

4705 

STA 

T02FB 

F80A 

20 EOF 5 

4710 

JSR 

QUTPLT 

F80D 

4CD5FB 

4715 

BS 1 a MR 

DDL COL 

F8 1 0 

20AAF7 

4720 

TAB JSR 

CRSRRT 

F813 

A 55 5 

4725 

LDA 

$55 

F8 15 

0552 

4730 

CMP 

$52 

F817 

DOOA 

4735 

BNE 

TAB 1 

F8 1 9 

2034FA 

4740 

J 6 R 

DOCR 

FS1C 

2020FB 

4745 

JSR 

LOG GET 

F81F 

9002 

4750 

BCC 

TAB 1 

F821 

BO 07 

4755 

BCS 

TAB2 

F823 

A 563 

4760 

TAB 1 LDA $63 

F825 

2025FB 

4765 

JSR 

BITGET 

F828 

90E6 

4770 

BCC 

TAB 

F82A 

4CD5FB 

4775 

TAB2 J MR DDL COL 

F82D 

A 56 3 

4780 

SET TAB i. 

„DA $63 

F82F 

4C06FB 

4785 

J MR 

B I TSET 

F832 

A563 

4790 

CLRTAB 1. 

JJA $63 

F834 

4C12FB 

4795 

JMP 

B I TCL.R 

F837 

2085FC 

4800 

I NSC HR , 

JSR PHACRS 

F03A 

20A2F5 

4805 

JSR 

GETPLT 

F83D 

85 7 D 

48 1 0 

STA 

$7D 

F83F 

A900 

48 1 5 

LDA 

#0 

F84 1 

8DBB02 

4820 

STA 

$02BB 

F844 

20FFF5 

4825 

IN SC FI 4 

JSR DUTCH 2 

FS47 

AS 63 

4830 

LDA 

$63 

F849 

48 

4835 

PH A 


F84A 

20 DCF 9 

*4 0 4 O 

JSR 

I NCR S A 

F84D 

68 

4845 

PL A 


F84E 

C563 

4850 

CMP 

$63 

F850 

BO 00 

4855 

BCS 

I NSCH3 

FS52 

A57D 

4 860 

INSCHl L 

Jjh $7D 

F854 

48 

4865 

PHA 


F855 

20A2F5 

4870 

JSR 

GETPLT 
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pass 

85 7D 

4875 

ST A $7D 

F85A 

68 

4880 

PLA 

F85B 

4C44F8 

4885 

JMP INSCH4 

F85E 

2090FC 

4890 

INSCH3 JSR F'LACRS 

F86 1 

CEB BO 2 

4895 

INSCH6 DEC $02BB 

F 064 

3004 

4900 

BMI INS CHS 

!“■ 866 

C654 

4905 

DEC *54 

F868 

D0F7 

49 1 0 

BNE I NSCI46 

F86A 

4CD5FB 

4915 

INSCH5 JMP DDLCOL 

F86D 

2085FC 

4920 

DELCHR JSR PHACRS 

F870 

2047F9 

4925 

DELCH1 JSR CDNVRT 

F873 

A 564 

4930 

LDA *64 

F875 

8568 

4935 

S ] A $6 8 

F877 

A565 

4940 

LDA $65 

F879 

0569 

4945 

ST A $69 

F87B 

A 563 

4950 

LDA $63 

F87D 

48 

4955 

PH A 

F87E 

20D4F9 

4960 

JSR I NCR SB 

F88 1 

68 

4965 

PLA 

F882 

C563 

4970 

CMP $63 

FSB 4 

BO 1 0 

4975 

BCS DELCH2 

F886 

A 554 

4980 

LDA $54 

F888 

CDBF02 

4985 

CMP $02BF 

F 88B 

BOO 9 

4990 

BCS DELCH2 

F88D 

20A2F5 

4995 

JSR GETPLT 

F890 

A 000 

5000 

LDY #0 

F892 

9168 

5005 

ST A ($68) „ Y 

F'894 

FODA 

50 1 0 

BEQ DELCH1 

F896 

A 000 

5015 

DELCH2 LDY #0 

F898 

98 

50 20 

TYA 

FS99 

9 1 68 

jOzj 

ST A ($68)., Y 

FS9B 

20 6 OF C 

5030 

JSR DELTIA 

F89E 

2090FC 

L' ■-.* ui 

JSR F'LACRS 

F8A1 

4CD5FB 

5040 

JMP DOLCOL 

1- 8h4 

38 

5045 

INSLIN SEC 

F8A5 

207BFB 

5050 

INSLIA JSR EXTEND 

F8A8 

A 5 52 

5055 

LDA $52 

F8AA 

8555 

5060 

ST A $55 

F8AC 

204 7F9 

5065 

JSR CDNVRT 

F8AF 

A 564 

5070 

LDA $64 

FSB 1 

8568 

5075 

S FA $68 

F8B3 

1 8 

5080 

CLC 

FSB 4 

6928 

5085 

ADC #40 

F8B6 

8566 

5090 

SI A $66 

F8B8 

A 565 

5095 

LDA $65 

F8BA 

8569 

5 1 00 

ST A $69 

F8BC 

6900 

5 1 05 

ADC #0 

F8BE 

8567 

5110 

ST A $67 

F8C0 

A654 

5 X 1 5 

LDX $54 

F8C2 

EO 1 7 

5 1 20 

CPX #23 

F8C4 

F008 

15" -j t-yiZT 
%-J i. .ill 

BEQ INSLI2 

F8C6 

204EFB 

J X *J 

INSLI1 JSR M0VL1N 

F8C9 

E8 

5 1 35 

I NX 

F8CA 

EO 1 7 

5 1 40 

CPX #23 

F8CC 

DoF 8 

5 1 45 

BNE INSLIl 

F8CE 

209BFB 

5 X 50 

INSLI2 JSR CLRLIN 

F8D 1 

4CD5FB 

5 X 55 

JMP DOLCOL 

F8D4 

20D5FB 

5 X 60 

DELL IN JSR DOLCOL 

F8D7 

A 45 1 

5 1 65 

BELLI A LDY $51 

F8D9 

8454 

5 1 70 

STY $54 

F8DB 

A 45 4 

5 1 75 

DELL IB LDY $54 
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FSDD 

98 

5 1 80 

DELL I 1 TV A 

F8DE 

38 

5 1 85 

SEC 

FSDF 

2023FB 

5190 

JSR L026ET 

F0E2 

00 

5 1 95 

PHP 

F8E3 

98 

5200 

tya 

F8E4 

18 

5205 

CLC 

F8E5 

6978 

52 1 0 

ADC 4120 

F8E7 

20 

i~; ^ j i is; 

F'LP 

F8E8 

2004 FB 

U 'J 

JSR BITPLJT 

F8EB 

C8 

i~r ^ 7 * ^ 7 * ir 

w aZ.. 

I NY 

FQEC 

CO 18 

i:r {~\ 

CPY #24 

FSEE 

DOED 

£... -«V 

•_J .ii. ■_> •- J 

BNE DELL 11 

F8F0 

ADB402 

5240 

LDA $0284 

F8F3 

090 1 

5245 

OR A #1 

F8F5 

8DB402 

er*-jnsr f -j 

STA $0284 

F 01" S 

/\ cr c:r j — i 

5255 

DELL 12 LDA $52 

F8FA 

8555 

5260 

STA $55 

F8FC 

2047F9 

5265 

JSR CONVRT 

F8FF 

20B2FB 

5270 

JSR SCR0L1 

F902 

2 02 OF B 

5275 

JSR LOGGET 

F905 

90D4 

5280 

BCC DELL IB 

F907 

4CD5FB 

5235 

JMP DDL COL 

F90A 

AO 20 

5290 

BELL LDY #$20 

F90C 

20F2F0 

i -7 "i n cr 
vJ •■L .• •_ J 

BELLI JSR CLICK 

F90F 

88 

5300 

DEY 

F910 

1 OF A 

bouh 

BPL BELLI 

F9 1 2 

60 

5310 

RTS 

F913 

A 902 

cr ":«• i i::r 
JO 1 -J 

DBDDEC LDA #2 

F91S 

DOOA 

*=c~r 

BNE DBSIJB 

F917 

A44C 

cr ”.y o cr 

V J V. 1 4^. J 

S i ORE LDY $4C 

F919 

302 B 

5330 

BMI STROK 

F91B 

A 000 

Kl” *7* |*7 

J ■-.* ‘-3 

LDY #0 

F9 ID 

9 1 64 

5340 

STORE 1 STA ($64 

F91F 

A 90 1 

5345 

DBDEC LDA #1 

F921 

8D9E02 

5350 

DBSUB STA $029 E 

F924 

A54C 

5355 

LDA $4C 

F926 

30 1 E 

5360 

BMI STROK 

F928 

A 564 

r w •— r ; 

'.j *--* J 

LDA $-64 

F92A 

38 

5370 

SEC 

F92B 

ED9E02 

5375 

SBC $029E 

F92E 

8564 

5380 

STA $64 

F930 

B002 

5385 

BCS DBSUB 1 

F 932 

C665 

5390 

DEC $65 

F934 

A50F 

5395 

DBSUB 1 LDA $0F 

F936 

0565 

5400 

CMP $65 

F938 

9O0C 

5405 

BCC STROK 

F93A 

D006 

54 10 

BNE STIRERR 

F93C 

A50E 

54 1 5 

LDA $0E 

F93E 

0564 

5420 

CMP $64 

F940 

9004 

5425 

BCC STROK 

F942 

A993 

5430 

STRERR LDA #$93 

F'944 

8540 

5435 

STA $40 

F946 

60 

5440 

STROK RTS 

F947 

A 5 54 

5445 

CONVRT LDA $54 

F949 

48 

5450 

PHA 

F94A 

A 555 

5455 

LDA $55 

F94C 

48 

5460 

PHA 

F94D 

A 5 56 

5465 

LDA $56 

F94F 

48 

5470 

PHA 

F950 

20D4FC 

5475 

JSR PUTMSC 

F953 

A554 

54 Su 

LDA $54 
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F"955 

8566 

5485 

8 1 A '£66 

p r~, nr "7 

A 900 

5490 

LDA #0 

F959 

8567 

5495 

ST A $67 

F95B 

H J ij £:« 

5500 

LDA £66 

F95D 

0A 

jijU u 

ASL A 

F95E 

2667 

nr nr -i 
J j J. 

ROL $67 

F 960 

855 1 

nr i nr 
iJ \.i 1 . iJ 

ST A $51 

F962 

A 46/ 

m;. J~.. .. 

5320 

LDY $67 

F964 

8C9F02 

nr nr nr 
iJ 1 .til tJ 

STY $029 F 

F967 

OA 

nr nr t 
vJ_J 2*0 

ASL A 

F96S 

266 7 

15- nr- -f 15' 
\.j t.i tJ 

RQL. $67 

F96A 

OA 

5540 

ASL A 

F96B 

266 / 

nr nr /i nr 

•jj4j 

RQL $67 

F96D 

18 

cr j:::* \zv s\ 

3550 

CLC 

F96E 

L nr nr i 

OxjD j. 

nr nr nr nr 


Jt JiJ iJ 

hJDL £b j. 

F970 

8566 

5560 

SI A £66 

F972 

A 56 7 

r“ r** / 

X-. u, . U. 

'.J ;J ( J tJ 

L. DA $6 7 

F974 

6D9F02 

in- nr -7 

v J •_ J / O 

ADC $029F 

F977 

8567 

5575 

ST A $67 

F979 

A 65 7 

5580 

LDX $57 

F97B 

BC75FE 

nr nr q ! 5 - 
-.J U i.i 

LDY ONLINE., X 

F97E 

88 

5590 

CQNVRl DEY 

F97F 

3007 

5595 

BM I CCNVR2 

F981 

0666 

5600 

ASL £66 

F983 

2667 

5605 

RQL. $67 

F985 

4C7EF9 

56 1 0 

J MR CONOR 1 

F988 

BCA5FE 

■jo J. 3 

CQNVR2 LDY DIV2TB 

F98B 

i\ nr nr nr 
M-.Jv.KJ 

5620 

LDA $55 

F98D 

A 20 7 

5623 

LDX #7 

F98F 

88 

jooO 

CQNVR3 DEY 

F990 

3 00 A 

3633 

BMI C0N0R4 

F992 

c:a 

5640 

DEX 

F993 

4656 

5645 

L.SR $56 

F995 

6 A 

5650 

ROR A 

h 996 

6EA 1 02 

3633 

ROR $02 A 1 

F999 

4C8FF9 

5660 

JMP CONOR 3 

F99C 

C8 

3665 

CON OR 4 INY 

F99D 

18 

5670 

CLC 

F99E 

6566 

5675 

ADC $66 

F9A0 

8566 

5680 

ST A $66 

F9A2 

9002 

5685 

BCC CO NOR 5 

F9A4 

I*'" / / ***** 

7 

5690 

INC $67 

F9A6 

38 

5695 

CONORS SEC 

F9A7 

6EA102 

5 700 

C0N0R6 ROR $02 A 1 

F 9AA 

i 8 

5705 

CLC 

F9AB 

CA 

571 0 

DEX 

F9AC 

101-9 

57 1 5 

BPL CGN0R6 

F9AE 

AEA 1 02 

nr — r *-» 

•- J / jL O 

LDX $02 A 1 

F9J31 

A566 

5725 

LDA $66 

F9B3 

18 

5730 

CLC 

F9B4 

6564 

5 735 

ADC $64 

F9B6 

8564 

5740 

S 1 A £ 6 4 

F9B8 

85 5 E 

5745 

ST A $5E 

F9BA 

A567 

5 / 50 

LDA £6 7 

F9BC 

6563 

nr nr nr 
U / i j tj 

ADC $65 

F9BE 

8565 

•_j / £:*0 

ST A $65 

F9C0 

855F 

12 ** 7 r* 

3 / 63 

STA $5F 

F9C2 

BDB5FE 

5 7 / O 

LDA DM A SKI" , X 

F9C5 

8 DA 00 2 

3 / 73 

STA $02 AO 

F9C8 

856F 

5780 

S 1 A £6F 

F9CA 

68 

5785 

PLA 
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F9CB 

8556 

5790 

ST A $56 

F9CD 

68 

5795 

PL A 

F9CE 

8555 

5800 

STA $55 

F9D0 

68 

5805 

PL A 

F9D1 

8554 

5810 

STA $54 

F9D3 

60 

58 1 5 

RTS 

F9D4 

A 900 

5820 

I NCR SB LDA #0 

F9D6 

F002 

5825 

BEQ INCRSC 

F9D8 

F9DA 

A 999 

5830 

INCRSR LDA #$9B 

85 /D 

5835 

INCRSC STA $7D 

F9DC 

j:r l . jl . ~r 

5840 

INCRSA INC $63 

F9DE 

E655 

5845 

INC $55 

F9E0 

DOC) 2 

5850 

BNE INCSR2 

F9E2 

E656 

i™’ rj j:::; irr 
*- J vj w 

INC $56 

F9E4 

A 5 5 5 

5860 

INCSR2 LDA $55 

F l ~? E 6 

A657 

5865 

LDX $57 

F9E8 

DD85FE 

5870 

CMP COLUMN , 

F9EB 

FOOB 

5875 

BEQ INC2A 

F9ED 

E: 000 

5880 

CPX #0 

F9EF 

D006 

5885 

BNE INCRS3 

F9F 1 

C553 

5890 

CMP $53 

F9F3 

F002 

5895 

BEQ I NCR'S 3 

F9F5 

BOO 1 

5900 

BCS INC2A 

F9F7 

60 

5905 

I.NCRS3 RTS 

F9FS 

EOOS 

59 1 0 

INC2A CPX i+8 

F9FA 

9004 

59 1 5 

BCC DOCRi 

F9FC 

A556 


LDA $56 

F9FE 

F0F7 

5925 

BEQ 1 NCR S3 

FA 00 

r. i m " 

/ 

5930 

DOCRI LDA $57 

FA 02 

DO 30 

5935 

BNE I) OCR 

FA04 

A 5 63 

5940 

LDA $63 

F A 06 

C95 1 

5945 

CMP #81 

FA 08 

900 A 

5950 

BCC DO CRIB 

F AoA 

A57D 

5 V 5 5 

LDA $7D 

FAOC 

F026 

5960 

BEQ DOCR 

FACE 

2 030 FA 

5965 

J SR DO CRMS 

FA 1 1 

4 C 77 FA 

5970 

JMP INCRS1 

FA 14 

2 034 FA 

5975 

DOCR IB JSR DOCR 

FA 17 

A 55 4 

5980 

LDA $54 

FA 19 

IS 

5985 

CLC 

FA 1 A 

6978 

5990 

ADC #120 

FA 1C 

2025FB 

5995 

J SR BITGET 

h A 1 1- 

9008 

6000 

BCC DOCR .1 A 

FA21 

A57D 

6005 

LDA $7D 

FA23 

F004 

60 1 0 

BEQ DOCRI A 

FA 25 

18 

60 1 5 

CLC 

FA26 

20A5F8 

6020 

JSR INSLIA 

FA29 

4CD5FB 

6025 

DOCRI A JMP DDL O 

FA2C 

A900 

6030 

NO SCR L LDA #0 

FA2E 

F002 

6035 

BEQ N0SCR1 

FA 30 

A 99)3 

6040 

DOCRWS LDA #$9B 

FA 32 

857 D 

6045 

NO SCR 1 STA $71) 

FA34 

20FEF0 

6050 

DOCR JSR COLOR 

FA 37 

A 900 

V vJ vJ 

LDA #0 

FA39 

8556 

6U6U 

STA $56 

FA3B 

EE 6 54 

6065 

INC $54 

FA3D 

A657 

6070 

D0CR2 LDX $57 

FA3F 

AO 18 

/ .**. *♦*¥ l*“* 

*— 1 *./ / 

LDY #24 

FA4 1 

24 7 B 

6080 

BIT $7B 

FA 43 

1005 

6085 

BPL DOCR 2 A 

FA45 

A 004 

6090 

LDY #4 


X 
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FA47 

98 

FA48 

D003 

FA4A 

BD95FE 

FA4D 

C554 

FA4F 

D026 

FA51 

8C9D02 

FA 54 

8 A 

FA55 

D020 

FA57 

A57D 

FA 59 

F01C 

FA5B 

C99B 

FA5D 

38 

FA5E 

FOO 1 

FA60 

18 

FA6 1 

20ACFB 

FA 64 

EEBB02 

F A 67 

C66G 

F A 6 9 

CE9D02 

FA6G 

ADB202 

FA6F 

T r-i 

•-.‘O 

FA 70 

10EF 

FA 72 

AD9D02 

FA 75 

8554 

j“** •«*t«v 

Fh / / 

4CD5FB 

FA 7 A 

38 

FA7B 

B570 

FA7D 

E574 

FA7F 

9570 

FAB 1 

B57 1 

FA83 

E575 

FA85 

9571 

r* /•- .•*", ***t 

r Ho / 

60 

FA8B 

ADBF02 

FA SB 

C904 

FA8D 

F007 

FA8F 

/\ cr cr -y 

H-JJ / 

FA9 1 

}■* 005 

FA 93 

20FCF3 

FA 96 

A 92 7 

FA98 

C553 

I-A9A 

BOO 2 

FA9C 

8553 

FA9E 

A 65 7 

h HHU 

BD95FE 

FA A3 

C554 

FAA5 

902 A 

FAA7 

F028 

FAA9 

E008 

FAAB 

DOOA 

FA AD 

A 556 

FAAF 

FO 13 

FAB1 

C901 

FAB3 

DO 1 C 

FAB5 

FOO 4 

FAB7 

A 5 56 

FAB9 

DO 16 

r ABB 

B 1)8 51- i£ 

FADE 

C555 

FACO 

900F 

FAC2 

FOOD 

FAC 4 

A 901 


6095 
6 1 00 
6105 
6 1 1 0 
6 1 1 5 


/ 

is 


TYA 

BNE DGCR2B 
D0CR2A LDA NO ROWS,, 
DGCR2B CMP $54 


120 
6 1 25 


BNE 

STY 

TXA 


INCRS 1 
$02 9 D 


6 1 30 

BNE INCRS 1 

6 1 35 

LDA $7D 

6 1 40 

BEG INCRS 1 

6 1 45 

CMP #T9B 

6 1 50 

SEC 

6155 

BEQ D0CR4B 

6 1 60 

L L U 

6 1 6 5 

D0CR4B J SR SCRDI. 

6 1 70 

INC $02BB 

6 1 75 

DEC i*6C 

6 1 80 

DEC $02 9 D 

6 1 85 

LDA $02B2 

6 1 90 

SEC 

6195 

BPL. D0CR4B 

6200 

LDA $029 D 

6205 

ST A $-54 

6210 

INCRS 1 J MR DGLCC 

62 1 5 

SUBEND SEC 

6220 

LDA $70, X 

/ ***- 
l-l .V- .k. 

SBC $74 

6230 

ST A $70, X 

625b 

LDA $71, X 

6240 

SBC $75 

6245 

ST A $71,, X 

6250 

RTS 

6255 

ERAIMGE LDA $02BF 

6260 

CMP #4 


to.cLCKJ 

BEQ 

RANGE 

6270 

LDA 

$57 

6275 

BEQ 

RANGE 

6280 

J SR 

EOPEN 

6285 

RANGE LDA #39 

6290 

CMP 

$53 

6295 

BCS 

RANGES 

6500 

ST A 

$53 

6305 

RANGE3 L 

JTK $5 7 

63 1 0 

LDA 

NOROWS 

6:> 1 b 

CMP 

'•$54 

6320 

BlJU 

RNGERR 
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. BYTE 24, 12, 192, 192 

PEAS 

00000002 

8660 

D I 92TB . BYTE 0 , 0 , 0 , 2 , 3 , 2 , 3 , 2 , 3 , 1 , 1 , 1 

FEA9 

03020302 


FEAD 

03010101 



FEB1 

00000302 

8665 

.BYTE 0,0, 3, 2 

F E:B& 

00F"FF00F 

8670 

D M A S K T . B Y T E 0 , T F F , $ F 0 , 0 F , $C0,$30,$0C, 3 

FEB9 

C0300C03 


FEED 

80402010 

8675 

MASKTB . BYTE %B0 , $40 , $20 , $ 1 0 , 8 , 4 , 2 , 1 , 0 ,1,3,7 

FEC 1 

0804020 1 



FEC5 

000 1 0307 



FEC9 

28CAB246 

8680 

COLRTB . BYTE $28 , $CA , $B2 , $46 , 0 

FEED 

00 



FECE ' 

IB 

8685 

CNTRLS .BYTE $1B 

FECF 

79F7 

8690 

. WORD ESCAPE 

FEDl 

1C 

8695 

.BYTE $1C 

FEE) 2 

7FF7 

8700 

. WORD CRSRUP 

FED4 

1 D 

8705 

.BYTE $ 1 D 

FEDS 

8CF7 

8710 

.WORD CRSRDN 

FED7 

IE 

87 1 5 

«. B Y 1 E ‘-p J. F:l 

FEDS 

99F7 

8720 

. WORD CRSRLF 

FEDA 

IF 

Cj **7 O u::- 

.BYTE $ 1 F 



0SNFV60 1 
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FEDB 

AAF7 

8730 

FEDD 

7D 

8735 

FEDE 

B9F7 

8740 

1- EEO 

7E 

8745 

FEE1 

E6F7 

8750 

FEE3 

7F 

8755 

FEE 4 

1 OF 8 

8760 

I-EE6 

9B 

8765 

FEE7 

3 OF A 

8770 

FEE 9 

9C 

8775 

FEEA 

D4F8 

8780 

FEED 

9D 

8785 

FEED 

A4F8 

8790 

F ELF 

9E 

8795 

FEFO 

32F8 

8800 

FEF2 

9F 

8805 

FEF3 

2DF8 

88 1 0 

F !:: F b 

FD 

88 1 5 

FEF6 

OAF 9 

8820 

FEF8 

FE 

8825 

FEF9 

6DF8 

8830 

FEFB 

FF 

8835 

FEFO 

37F8 

8840 

FEFE 

6C6A3B80 

8845 

FF02 

806B2B2A 


F F 06 

6F807075 

8850 

FFOA 

9B692D3D 


FFOE 

76806380 

OQRC“ 

DOJJ 

FF 12 

80627 87 A 


FF 1 6 

34803336 

8860 

FF 1 A 

IB 3532 31 


FF IE 

2C202E6E 

8865 

FF22 

806D2F81 


FF26 

72806579 

8870 

FF2A 

7F74777 1 


FF2E 

39803037 

8875 

FF32 

7E383C3E 


FF36 

66686480 

8880 

FF3A 

8267736 1 


FF3E 

4C4A3A80 

8885 

FF42 

804B5C5E 


FF46 

4F*80!",0F.! ::: i 

8890 

FF4A 

9B495F7C 


FF4E 

56804380 

8895 

FF52 

8042585 A 


FF56 

24802326 

8900 

FF5A 

1 B 2 522 2 1 


FF5E 

5B205D4E 

8905 

FF62 

804D3F8 1 


FF66 

52804559 

89 1 0 

FF6A 

9F54575 1 


FF6E 

28802927 

89 1 5 

FF72 

9C407D9D 


FF76 

46484480 

8920 

FF7A 

8347534 1 


FF7E 

0C0A7B80 

8925 

FF82 

800B1E1F 


FF 86 

OF 80 1 0 1 5 

8930 

F F 8 A 

9B091C1D 


FF8E 

1 6800380 

8935 

FI-92 

8002 181 A 



, WORD CRSRRT 
.BYTE $7D 
. WORD CLRSCR 
. BYTE $7E 
.WORD BS 
. BYTE $7F 
.WORD TAB 
. BYTE $9B 
. WORD DOCRWS 
.BYTE *9C 
.WORD DELL IN 
. BYTE $9D 
.WORD INSLIN 
.BYTE $9E 
. WORD CLRTAB 
. BYTE $9F 
. WORD SET TAB 
.BYTE $FD 
.WORD BELL 
. BYTE $FE 
. WORD DELL: HR: 

. BYTE $FF 
.WORD INSCHR 

ATASC I . BYTE $6C , $6A , $3B , $80 , $SO , $6B , $2B $ 


. BYTE $6F“ , $80 , $70 , $75 , $9B r , $69 , $2D , $3D 
. BYTE $76 , $80 , $63 , $80 , $80 , $62 , $78 , $7 A 
. BYTE $34 , $80 , $33 , $36 , $ 1 B , $35 , $32 , $3 1 
. BY I E $20 , $20 , $2E1 , $6E , $80 , $6D , $2F , $8 1 
. BYTE $72 , $80 , $65 , $79 , $7F , $74 , $77 , $7 1 


*:>U , 

m t* •**v 
* , 

tr. 

LU 

N 

$38, 

* 6 4 , 

$80, 

$82 , 

$67 , 

*3A, 

$80 , 

$80, 

$4B , 

*50, 

*55 

$9B , 

$49, 

*43 , 
** 

*80 , 

$80 , 

$42, 

*23 , 

*26 , 

$ 1 B , 

$25, 

*5D , 

*4E , 

$80 , 

$4D , 

*45 ? 

*59 , 

$9F , 

$54 , 

*29 ,, 

*2 / ? 

$9C , 

$40 , 

*44 q 

*80 , 

$83 , 

$47, 

*7B , 

*80 , 

$80, 

$0B , 

* 1 0 , 

*15, 

$9B , 

$09, 

*03 , 

*80 , 

$80 , 

$02, 
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60 1 


FF96 

80808580 

8940 

.BYT E * 8 0 , * 8 0 , * 8 5 , * 8 0 , * 1 B , * 8 0 , *FD, * 8 0 

FF9A 

1BB0FD80 



FF9E 

0020 6 OOE 

8945 

. BYTE *00 , *20 , *60 , *0E , *80 , *0D , *80 , *8 1 

!"■ F A 2 

8000808 1 


FFA 6 

1 28005 1 9 

8950 

. BYTE *12, *80 , *05 ,*19, *9E , * 1 4 , * 1 7 , * 1 1 

FFAA 

9E14171 1 


FFAE 

£30808080 

8955 

. BYTE *80 , *80 , *80 , *80 , *FE , *80 , *7D , *FF 

FFB2 

FE807DFF 


FFB 6 

06080480 

8960 

. BYTE *06 , *08 , *04 , *80 , *84 , *07 , * 1 3 . *0 1 

F F* B A 

84071301 



FFBE 

AD09D2 

8965 

PIRQ5 LDA *1)209 

FFC 1 

CDF 20 2 

8970 

CNF' *02F2 

FFC4 

1)005 

8975 

BNE PIRQ3 

FFC 6 

ADF 102 

8980 

LDA *02F 1 

FFC 9 

DO IE 

8985 

BNE PIRQ4 

FFCB 

AD09D2 

8990 

PIRQ3 LDA *0209 

FFCE 

C99F 

8995 

CMP #*9F 

FFDO 

DOOA 

9000 

BNE PIRQ1 

FFD2 

ADFF02 

9005 

LDA $U 2 F F : 

FFDS 

49FF 

90 1 0 

EOR #*FF 

FFD7 

8 OFF 02 

90 1 5 

ST A *02FF 

FFDA 

BOOD 

9020 

BCS PIRQ4 

FFDC 

8DFC02 

9025 

PIRQ1 ST A *02FC 

FFDF 

8DF202 

9030 

ST A *02F2 

FFE 2 

A 901 

9035 

LDA #1 

FFE4 

8 OF 102 

9040 

SI A *02F 1 

FFE7 

854D 

9045 

ST A *4D 

FFE9 

A9 1 0 

9050 

PIRQ4 LDA #*10 

FFEB 

8D2B02 

9055 

ST A *022B 

1 “ F BE 

60 

9060 

P IRQ 2 PL A 

FFEF 

40 

9065 

RT I 

1- F I- U 

40002060 

9070 

AT A I NT . BYTE *40 , 0 , *20 , *60 

FFF4 

20400060 

9075 

I NT AT A .. BYTE *20 , *40 , 0 , *60 

FI-F 8 

F3E61CE9 

9080 

. BYTE *F3 , *E 6 , * 1 C , *E9 , *35 , *E9 , *F3 , *E& 

FFFC 

35E9F3E6 


0000 


9999 

. END 5 



